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

Есть готовые решения для PickList ячеек TStringGrid?   Найти похожие ветки 

 
Aleksandr.   (2006-10-05 15:47) [0]

Чтобы при входе в ячейку можно было выпадающий список открывать?


 
КотКамышовый ©   (2006-10-05 16:56) [1]

можно ComboBox использовать.
Делать видимым при входе в ячейку. Parent := Grid, координаты = CellRect ну и т.д.


 
Loginov Dmitry ©   (2006-10-05 23:16) [2]

КотКамышовый ©   (05.10.06 16:56) [1]
Parent := Grid


А вот этого ради бога не надо! Слишком классные эффекты после этого наблюдаются :)


 
Германн ©   (2006-10-06 01:17) [3]


> Есть готовые решения для PickList ячеек TStringGrid?

Есть. У Максима http://www.torry.net/ всё есть. Как в Греции.


 
ЮЮ ©   (2006-10-06 04:54) [4]

TCustomGrid
protected
 function GetEditStyle(ACol, ARow: Longint): TEditStyle; dynamic;
 function CreateEditor: TInplaceEdit; virtual;

function TCustomGrid.GetEditStyle(ACol, ARow: Longint): TEditStyle;
begin
 Result := esSimple;
end;

В TRxDrawGrid, например, это сделано так:

function GetEditStyle(ACol, ARow: Longint): TInplaceEditStyle; override;

function TRxDrawGrid.GetEditStyle(ACol, ARow: Longint): TInplaceEditStyle;
begin
 Result := esSimple;
 if Assigned(FOnGetEditStyle) then FOnGetEditStyle(Self, ACol, ARow, Result);
end;

Т.е. определение стиля редактора вынесено в обработчик события  OnGetEditStyle

TInplaceEditList = class(TInPlaceEdit)
public
 property OnGetPickListitems: TOnGetPickListItems read FOnGetPickListitems
     write FOnGetPickListitems;

Т.е. после создание редакторя ячейки следует редактору назначить обработчик

З.Ы. Если данные хранятся в некой "таблице" в памяти, то можно взять TRxDrawGrid, где останется написать OnSet[Get]EditText и OnDrawCell.
(TrxDrawGrid уже имеет нужные методы
   procedure DrawStr(ARect: TRect; const S: string; Align: TAlignment);
   procedure DrawMultiline(ARect: TRect; const S: string; Align: TAlignment);
   procedure DrawPicture(ARect: TRect; Graphic: TGraphic);
   procedure DrawMasked(ARect: TRect; Graphic: TBitmap);
)
Необходимые для редактирования данные вынесены там о обработчики совытий



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

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



Память: 0.46 MB
Время: -0.969 c
2-1162464612
dmdel
2006-11-02 13:50
2006.11.19
вертикальные заголовки в StringGride


15-1162279588
Карелин Артем
2006-10-31 10:26
2006.11.19
Кто за удаленным компьютером сидит?


15-1162546905
Руслан
2006-11-03 12:41
2006.11.19
Нужна картинка студента


3-1158396759
urel
2006-09-16 12:52
2006.11.19
Связи в БД


2-1162358463
apic
2006-11-01 08:21
2006.11.19
EXE в БД




   Наверх