Вниз
Скачать: CL | DM;

Как в одну ячейку StringGrid засунуть две строки?   Найти похожие ветки 

← →
MBoris   (2005-10-24 13:41) [0]

Доброго времени суток! Подскажите, пож-та, как в одну ячейку StringGrid засунуть две строки, т.е. типа StringGrid.Cells [0,0]:="Привет"+#13+" Люди";
Спасибо!


← →
umbra ©   (2005-10-24 15:18) [1]

Можно так:


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

begin
 StringGrid1.Canvas.Textout(rect.Left, rect.Top, "Привет");
 h := StringGrid1.Canvas.TextHeight("Привет");
 StringGrid1.Canvas.Textout(rect.Left, rect.Top + h, "Привет");
end;


← →
begin...end ©   (2005-10-24 15:23) [2]

OnDrawCell + DrawText


← →
MBoris   (2005-10-24 17:23) [3]

Наверное, будет звучать глупо? А какие значения может принимать State: TGridDrawState. Я пытался подставить gdSelected, gdFocused, gdFixed - ничего не вышло!


← →
Германн ©   (2005-10-24 17:26) [4]

Это Set of. А следовательно []


← →
MBoris   (2005-10-24 17:33) [5]

А какие значения может принимать Rect: TRect при вызове функции


← →
MBoris   (2005-10-24 17:35) [6]

>> begin...end ©   (24.10.05 15:23) [2]
>> OnDrawCell + DrawText
...это что ты имел ввиду?


← →
Германн ©   (2005-10-24 17:41) [7]


> А какие значения может принимать Rect: TRect при вызове
> функции


Какая функция имеется в виду?


← →
MBoris   (2005-10-24 17:43) [8]

Ой простите при вызове процедуры.
Вот этой:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);


← →
Германн ©   (2005-10-24 17:48) [9]

Он принимает значение того прямоугольника, который тебе нужно перерисовать. В данном случае это та самя ячейка грида. Если не ошибаюсь включая рамку.


← →
umbra ©   (2005-10-24 17:50) [10]


> procedure TForm1.StringGrid1DrawCell


Это процедура-обработчик события. На вашей форме отметьте StringGrid, в инспекторе обектов щелкните на закладку Events (События). Найдите там OnDrawCell и дважды щелкните по редактируемому полю справа от надписи. В редакторе кода появится заготовка процедуры. вставляете в нее код из примера. Она будет автоматически вызываться каждый раз, когда приложению надо будет нарисовать StringGrid. Все параметры передаются в нее приложением Изменять их без надобности не стоит.
Подробности - в справке про класс ТStringGrid


← →
MBoris   (2005-10-24 17:52) [11]

Большое спасибо за то, что помогаете новичкам-самоучкам!!!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.025 c
14-1129816532
BerkeleyMan
2005-10-20 17:55
2005.11.13
Москва


3-1127371242
lightix
2005-09-22 10:40
2005.11.13
Выбор БД и средства разработки


14-1130057138
Piter
2005-10-23 12:45
2005.11.13
А что случилось с сервисами NextMail?


2-1130299499
UVV
2005-10-26 08:04
2005.11.13
Можно ли так, или я многого хочу от Delphi


2-1129965383
картограф
2005-10-22 11:16
2005.11.13
крестики-нолики




   Наверх