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

Вниз

Как динамически создать обьект на форме , например ListView ?   Найти похожие ветки 

 
kolj   (2007-11-03 04:19) [0]

Если можно , то напишыте пример , спасибо.


 
BATTLE_MAX ©   (2007-11-03 09:52) [1]

Вот пример:

procedure TForm1.Button3Click(Sender: TObject);
var
 ListView1: TListView;
begin
 ListView1:=TListView.CreateParented(form1.Handle);
 listView1.Top:=150;

 form1.InsertControl(ListView1);

 listView1.ShowColumnHeaders:=true;
 listView1.ViewStyle :=vsReport;
 listView1.Columns.Add.Caption:="MAX";
 listView1.Columns.Add.Caption:="MAX";

 listView1.Items.BeginUpdate;
 with ListView1.Items.Add do
 begin
   Caption:= "ggg";
   SubItems.Add(" Кб");
   SubItems.Add("123");
 end;
 listView1.Items.EndUpdate;
end;


 
Kolan ©   (2007-11-03 09:54) [2]

Поле формы:
FListView: TListView;
&#133

Метод формы:
begin
 FListView := TListView.Create(Self);
 FListView.Parent := Self;
 FListView.Top := 100;
 FListView.Left := 100;
 FListView.Width := 100;
 FListView.Height := 100;
 FListView.Visible := True;
end;


 
timekiller   (2007-11-03 14:45) [3]

Если не пахает всеравно - то можно приписать к ВЫШЕСКАЗАННОМУ:

initialization
 RegisterClasses([TDateTimePicker{, можно еще какуюнить херь}]);

= ))


 
Amoeba ©   (2007-11-03 17:05) [4]

Жизнь и смерть в режиме run-time:
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=342



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

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

Наверх




Память: 0.47 MB
Время: 0.025 c
15-1193341207
@!!ex
2007-10-25 23:40
2007.11.25
Объясните?


2-1193888268
Гном1
2007-11-01 06:37
2007.11.25
2 вопроса по БД


15-1192887600
Tirael
2007-10-20 17:40
2007.11.25
есть ли способ


15-1193027871
Slider007
2007-10-22 08:37
2007.11.25
С днем рождения ! 22 октября 2007 понедельник


2-1193743022
Reni
2007-10-30 14:17
2007.11.25
tmemorystream-> string?