Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Thomasl,
5. Mär 2007
Das Flickern ist auch beim code von bitsetter da
nach ein wenig suche im forum http://www.delphipraxis.net/internal_redirect.php?t=7334&highlight=flickern
habe ich es doch noch wegbekommen
var
Form1: TForm1;
Listindex : integer;
implementation
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Thomasl,
4. Mär 2007
Weil ich es für mein eigenes Programm brauche und hier die ansätze gefunden habe
(ich Programmiere mir einen MP3 Player mit BASS.DLL)
Das rüberschieben zu einer anderen listbox dürfte einfacher sein (brauche ich aber nicht).
Gibt es noch einen einfacheren weg?
Bekommt man das flacken beim verschieben noch weg?
dragmode := dmAutomatic
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Thomasl,
4. Mär 2007
Ich habe den Code von bitsetter noch ein wenig abgeändert damit er mit allen listboxen geht
jetzt fehlt nur noch multiselect
procedure TForm1.ListBox1DragOver(Sender, Source: TObject; X, Y: Integer;
State: TDragState; var Accept: Boolean);
begin
if (Sender = Source) and (Sender is TListbox) and ((Source as Tlistbox).ItemIndex <> -1) then
begin