Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.31;
Скачать: CL | DM;

Вниз

Объекты в StringGrid   Найти похожие ветки 

 
md5 hash   (2004-10-18 08:15) [0]

Доброго всем мастерам и новичкам Delphi.
Решил заделать небольшую фишку в своей проге. Имеется оформленный StringGrid. Возможно ли поместить в отдельную его ячейку какой нить компонент типа TEdit или TCheckBox. И если возможно, то как получить с него введненные значения. Спасибо.


 
Warlock ©   (2004-10-18 09:02) [1]

Быстро и коряво:

На форма в любом месте лежить Edit1 с свойством Visible = False

procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
 ARow: Integer; var CanSelect: Boolean);
begin
Edit1.Top:=StringGrid1.Top+ARow*StringGrid1.DefaultRowHeight+4;
Edit1.Left:=StringGrid1.Left+ACol*StringGrid1.DefaultColWidth+4;
Edit1.Width:=StringGrid1.DefaultColWidth;
Edit1.Text:=StringGrid1.Cells[ACol,ARow];
Edit1.Visible:=True;
Edit1.SetFocus;
end;

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
if Key=VK_Return then
 begin
  Edit1.Visible:=False;
  StringGrid1.Cells[StringGrid1.Col,StringGrid1.Row]:=Edit1.Text;
  Edit1.Text:="";
 end;
end;


этот код можно переработать пограмотнее.


 
KSergey ©   (2004-10-18 09:14) [2]

Ну эдит туда [в ячейку] и так помещается. Сам по себе, редактирование просто включить надо.

А по поводу чекбоксов - читать где-нибудь тут

http://www.delphikingdom.com/helloworld/dbgridcolor.htm
http://www.delphikingdom.com/helloworld/mergegrid.htm
http://www.delphikingdom.com/helloworld/nogrid.htm
http://www.delphikingdom.com/helloworld/grid.htm
http://www.delphikingdom.com/helloworld/dbgridplus.htm



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

Текущий архив: 2004.10.31;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.023 c
14-1097482918
ORMADA
2004-10-11 12:21
2004.10.31
Зацените прогу


14-1097177417
KilkennyCat
2004-10-07 23:30
2004.10.31
Деньги


3-1096628791
DesWind
2004-10-01 15:06
2004.10.31
Обновление лукап поля


1-1097787492
Loki3D
2004-10-15 00:58
2004.10.31
конвертация в bmp из GIF и TIFF


1-1097842230
MegaVolt
2004-10-15 16:10
2004.10.31
Как правильно наследовать свойства?