Einzelnen Beitrag anzeigen

Danyel

Registriert seit: 7. Okt 2009
Ort: Lübeck
15 Beiträge
 
Delphi 5 Standard
 
#1

OnMouseDown Methode hinzufügen->Label wird per Code erste

  Alt 27. Mär 2010, 16:41
Hi,
dies ist meine erste Frage und ich hoffe ich bin hier richtig.
Falls es schon Themen dieser Art geben sollte, entschuldige ich mich.
Gefunden habe ich nemlich keine und welche Suchbegriffe ich verwenden
könnte ist mir auch nicht ganz klar.

Ich möchte bei Labels, die zur Laufzeit erstellt werden, die
OnMouseDown Methode hinzufügen.

Delphi-Quellcode:
MyLabel:=TLabel.Create(Form3);
            with MyLabel do
            begin
                  ProcessPath(memo1.Lines[i], laufwerk, verzeichnisse, datei);
                  Caption:=datei;
                  Name:='label'+IntToStr(i);
                  left:=15;
                  top:=10+i*13;
                  width:=10;
                  height:=10;
                  visible:=true;
                  parent:=form3;
            end;
So lasse ich mir meine Labels erstellen und dies funktioniert einwandfrei.
Doch wie kann ich jetzt die besagte Methode hinzufügen?
Ich brauche die Methode, um die Labels später per Maus verschieben zu können, so wie
es in der Entwicklungszeit möglich ist.

Ich benutze Delphi 2005 und bin Schüler der Emil-Possehl-Schule, ich hoffe, dass ihr
alle Infos habt und mir helfen könnt.
Vielen Dank schonmal
Mit freundlichen Grüßen Danyel S.
Auch wenn am Ende dein Programm nicht läuft,
so bist mit dem Weg gewachsen und nichts war
umsonst!
  Mit Zitat antworten Zitat