sguruapp@gmail.com
facebook vk instagram Одноклассники youtube

Текст в 2 строки в StringGrid - Delphi


procedure TForm1.StringGrid2DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);

begin
if (ACol = 0) and (ARow = 0) then
begin

StringGrid2.Canvas.TextOut(Rect.Left+ 10, Rect.Top, 'it-');
StringGrid2.Canvas.TextOut(Rect.Left+ 10, Rect.Top+15, 'guru');
StringGrid2.Canvas.TextOut(Rect.Left+ 10, Rect.Top+30, '.kz');
end;

end;


Возврат к списку

обучись профессии будущего

Хочешь стать успешным разработчиком
приложений? Тогда добро пожаловать к нам.

обучись профессии будущего