Label soll immer die höhe eines EditFeldes anzeigen

[Darksniper]

wie der Titel schon sagt will ich ein Label das immer die höhe eines EditFeldes anzeigt.

Wie geht das?

[scrat1979]

Zitat von Darksniper:

wie der Titel schon sagt will ich ein Label das immer die höhe eines EditFeldes anzeigt.

Wie geht das?

Änders Du im Quellcode die Höhe des Edit-Feldes? Dann füge darunter einfach folgendes hinzu:

Label1.Caption := IntToStr(Edit1.Height); Sonst würde mir nur noch die Möglichkeit über ein Timer mit o.g. Befehl im OnTimer-Event einfallen...

SCRaT

[Darksniper]

also das Label soll sich immer wider akualisieren

[dajuhsa]

alle 10 sekunden? dann nimm nen timer mit interval 10000 und schreib obigen code rein

[scrat1979]

Zitat von Darksniper:

also das Label soll sich immer wider akualisieren

Was genau hast Du denn vor? Wie gesagt, irgendwo musst Du ja die Höhe des Edit-Feldes verändern, sonst macht es ja keine Sinn. Da kannst Du dann auch wie oben geschrieben das Label aktualisieren.

Wenn Du das Label z.B. alle 5 Sekunden aktualisieren möchtest, dann füge Deiner Form ein Timer hinzu und benutze obigen Code, um das Label zu aktualisieren. Den Timer setzt Du auf 5000 (5*1000msec) und startest ihn (enabled := true).

Das müsste Dich doch zur Lösung bringen, oder?

[mkinzler]

Ich würde einfach bei Änderung der Größe des Edits die Beschriftung ändern.

[dajuhsa]

also du hast irgendwo sowas

Edit1.Height := 45; dann ersetz es durch

Delphi-Quellcode:

Edit1.Height := 45;
Label1.Caption := IntToStr(Edit1.Height)

[scrat1979]

Das sag ich doch schon die ganze Zeit

[Darksniper]

und wie stellt man den timer ein sodass er immer wieder abläuft

[mkinzler]

Du hast immer noch nicht kapiert, was man dir sagen will: Kein Timer sondern direkt bei der Änderung der Größe des Edits.