Kann ich das mit
Delphi-Quellcode:
procedure TForm1.Edit1DragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
begin
if Source = ListBox1 then
begin
Accept := true;
end;
end;
procedure TForm1.Edit1DragDrop(Sender, Source: TObject; X, Y: Integer);
begin
(Sender as TEdit).Text := ListBox1.Items[ListBox1.ItemIndex];
end;
usw... bei den Edits für alle Machen ich habe 24 Stück das ist ein wenig viel...
Und dann noch ich habe 2 mal Listboxen...
Ich bin shcon am probieren mit der 1 Listbox geht es mit der 2 aber nett...
