Forum: Object-Pascal / Delphi-Language
by Blubbel,
5. Jul 2012
Ich hab das Rätsel gelöst.
Danke für eure Hilfe.
Forum: Object-Pascal / Delphi-Language
by Blubbel,
4. Jul 2012
Egal wie ich es hindrehe und verändere es kommt immer an der selben Stelle eine Fehlermeldung...
Ich übersehe mit Sicherheit nur eine klitze kleine Kleinigkeit...?
Sry, dass ich so nerve aber irgendwie will das alles einfach nicht, zumal ich mit den Tcx-Komponenten noch nie gearbeitet hab.
Nun hab ichs... das Assigned(lNumber) gibt mir jetzt ein false zurück. Mal gucken ob ich es...
Forum: Object-Pascal / Delphi-Language
by Blubbel,
4. Jul 2012
Danke!! Jetzt meckert er weiter ich schau mal was ich tun kann... wenn ich gar nicht mehr weiter weiß schrei ich ganz laut ;)
Hier ist der Schrei!!!
if Assigned(Source) then
begin
lSource := string(Source.ClassName);
if (Source is TcxDragControlObject) and (TcxDragControlObject(Source).Control is TcxListBox) then //hier geändert
begin
lst1 :=...
Forum: Object-Pascal / Delphi-Language
by Blubbel,
4. Jul 2012
Soweit so gut. nun bekomme ich in der Zeile darunter eine Fehlermeldung
if Assigned(Source) then
begin
lSource := string(Source.ClassName);
if (Source is TcxDragControlObject) and (TcxDragControlObject(Source).Control is TcxListBox) then //hier geändert
begin
i := TcxListBox(Source).ItemIndex; //hier bekomme ich eine Fehler meldung
Forum: Object-Pascal / Delphi-Language
by Blubbel,
3. Jul 2012
Ok ein Problem gelöst. Habe vergessen DragMode auch Automatisch zu setzen.
Jetzt zeigt er mir ja aber noch an, dass sich die Nummer schon in dieser einen Gruppe befindet, obwohl da noch nichts drin steht.
ich werde mir mal meine Hilfsfunktionen angucken, ggbf euch zur Verfügung stellen.
Wenn cihs nun Durchsteppe geht schon die 2. If-Abfrage schief.
Forum: Object-Pascal / Delphi-Language
by Blubbel,
3. Jul 2012
Hallo Leute,
nach langer Zeit habe ich wieder ein Problem:
Ich habe eine ListBox, in der Nummern geäddet werden. Im TreeView habe ich Gruppen. Die Nummern sollen den Gruppen mit Drag&Drop zugewiesen werden. Irgendwie geht hier aber mein Code nicht richtig. Also ich kann die Nummern markieren aber mehr auch nicht.
kurz gesagt: Es passiert einfach gar nichts.
Danke schon mal für...