Deutsches Lazarusforum

Nach viel rumprobieren wende ich mich mal wieder ans Forum. Diesmal hab ich versucht in TSpinedit eine führende Null zu erzeugen, bin aber gescheitert. In einem anderen Forum bin ich auf folgende Vorgehensweise gestoßen: TSpinEdit(Sender).Text:= format('%0.2d', [TSpinEdit(Sender)...

Erst mal Dankeschön für die Antworten. Was Spricht denn gegen die Verwendung von OnMouseDown ? OnMouseDown ist zwar ähnlich wie click aber ich glaub es gibt paar (feine) unterschiede wo man anfängt zu drücken und wo man loslässt. Dies aber bitte selber testen. Mich wundert eher wozu getcursorpos(...

Ich habe festgestellt dass es Mehrere Methoden zur Bestimmung der eigenen Mausposition gibt. Ich musste nun auch feststellen dass diese Methoden unterschiedliche ergebnisse hervorbringen. Während es bei getcursorpos(P:TPoint) und Mouse.CursorPos.X bzw Mouse.CursorPos.Y als Ursprung die Bildschirmeck...

Danke euch!

Mit refresh werden alle linien bei mir gelöscht. Das kann ich später auch irgendwo gebrauchen. Mit Application.ProcessMessages ist der Befehl bei dem das ausgeführt wird wonach ich gesucht hatte.

Viele Grüße
u-boot

Kurz was das Programm macht: Bei Klick auf bunte Linie: Labelededit werden angelegt und im Quelltext wird danach die Bezierkurve gezeichnet. Bei nochmaligem Klick wird Labelededit nicht angelegt, aber die Linie neu gezeichnet. Das Problem: Beim ersten Klick wird um das T-Labelededit herum wird die B...

Gut anscheinend hab ich das Problem ungenügend genau beschrieben. Dann muss ich wohl doch etwas ausholen wie ich das gemeint habe. mal mein Quelltext ... das Problem findet sich ganz unten Sry falls die Formatierung nich so hinhauen sollte var k:Integer; //Zähler für die Namensvergebung der Shapes &...

Ich habe eine Variable in der der Objektname (Shapename) steht worauf ich zugreifen will. Nun geht sowas wie Variable1.top statt Shape1.top schlecht was mir auch einleuchtet.

So aber wie muss man abändern, damit es funktioniert ?

Kurzfassung falscher Code:
Variable1:=Shape1
Variable1.top