• 🔥 Бесплатный курс от Академии Кодебай: «Анализ защищенности веб-приложений»

    🛡 Научитесь находить и использовать уязвимости веб-приложений.
    🧠 Изучите SQLi, XSS, CSRF, IDOR и другие типовые атаки на практике.
    🧪 Погрузитесь в реальные лаборатории и взломайте свой первый сайт!
    🚀 Подходит новичкам — никаких сложных предварительных знаний не требуется.

    Доступ открыт прямо сейчас Записаться бесплатно

Программная навигация в Tstringgrid

  • Автор темы Автор темы semantics
  • Дата начала Дата начала
S

semantics

Нужно сделать две операции в текстовой таблице TStringGrid:

1) Как программно переходить на заданную строку таблицы - чтобы она появилась в окне?

2)Можно ли сделать перенос текста на следующую строчку внутри ячейки TStringGrid?
 
1) Как программно переходить на заданную строку таблицы - чтобы она появилась в окне?
Не понятно в каком окне

2)Можно ли сделать перенос текста на следующую строчку внутри ячейки TStringGrid?

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow:
Integer; Rect: TRect; State: TGridDrawState);
var
Format: Word;
C: array[0..255] of Char;
begin
Format := DT_LEFT or DT_WORDBREAK;
(Sender as TStringGrid).Canvas.FillRect(Rect);
StrPCopy(C, (Sender as TStringGrid).Cells[ACol, ARow]);
WinProcs.DrawText((Sender as TStringGrid).Canvas.Handle, C,
StrLen©, Rect, Format);
end;
 
Мы в соцсетях:

Взломай свой первый сервер и прокачай скилл — Начни игру на HackerLab