Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Nightshade,
28. Okt 2004
Sorry, hatte im ShellTreeView die property ObjectTypes weg gemacht, da mich die Systemsteuerung irgendwie störte,
einfach wieder reinmachen.
Dann was aus dem Shelltreeview in den Listview droppen, und Form schliessen.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Nightshade,
28. Okt 2004
Ich häng einfach mal das ganze Projekt an :
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Nightshade,
28. Okt 2004
Zu 1.) Jep, stimmt, Kind ist bkClose, Modalresult ist mrNone
zu 2-3.) Das ListView ist auf Form2, nicht auf Form1....
zu 4.)
procedure TForm2.ListView1DragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
var a : string;
begin
Accept := Source is TShellTreeView;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Nightshade,
26. Okt 2004
Hallöle.
Ich hab nen Formular mit nem ListView, wenn ich da Items erstelle mit dem Code :
procedure TForm2.ListView1DragDrop(Sender, Source: TObject; X, Y: Integer);
var li : TListItem;
t : integer;
begin
if Source is TShellTreeView then begin
for t := 0 to pred(ListView1.Items.Count) do