Witam,
Jeżeli dynamicznie utworze sobie ListView to w jaki sposób powiązać ja z procedurami np. menu popup. Wiem, że ma to wyglądać tak:
SLV.popupmenu := PopupMenu3;
SLV.onClick := SystemListView1Click;
Jednak, gdy chciałbym wykonać poniższą procedurę na tworzonym dynamicznie komponencie to wyrzuca mi błąd podczas kompilacji.
dfsSystemListView1 - komponent tworzony dynamicznie
procedure TForm1.KopiujClick(Sender: TObject);
var
I: Integer;
FullName: String;
FullPath: String;
<begin
for I:= dfsSystemListView1.Items.Count - 1 downto 0 do
begin
FullName:=ExtractFileName(dfsSystemListView1.Items.Item[I].Caption);
FullPath:=IsDir(dfsSystemTreeView1.Directory) + FullName;
if CheckListBox2.Items.IndexOf(FullPath) < 0 then
CheckListBox2.Items.Add(FullPath);
W jaki sposób ten problem rozwiązać?
Z góry dziękuję za pomoc,
Piotr Murawski