Label Caption anzeigen.

No0B · Beiträge: 62

Mein Problem ist wahrscheinlich einfach zu lösen nur leider komme ich nicht drauf.

Habe ein Label:

Delphi-Quelltext

1:
2:

label1.Caption :=
 'Text1'#13#10'Text2';

wenn ich das Programm starte kommt immer die Caption die in Eigenschaften eingetragen ist "Label" und nicht meine die ich im Code eingetragen habe. Warum, wo ist das Problem.

Moderiert von Narses: Delphi-Tags hinzugefügt
Moderiert von Narses: Topic aus Multimedia / Grafik verschoben am Do 08.04.2010 um 22:37

elundril · Verfasst: Do 08.04.10 21:30

weil du den code nicht aufruft? Du musst die Zeile ja auch ausführen.

lg elundril

_________________

This Signature-Space is intentionally left blank.
Bei Beschwerden, bitte den Beschwerdebutton (gekennzeichnet mit PN) verwenden.

No0B · Beiträge: 62

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

procedure TForm1.Label1show(Sender: TObject);
begin
 label1.Caption :=
'Text1'#13#10'Text2'; 
 end;

das meinst du ? habe ich drin.

Moderiert von Narses: Delphi-Tags hinzugefügt

elundril · Verfasst: Do 08.04.10 21:34

Label1 hat keine Methode OnShow (zumindest im D7). Ich nehme an das hast du selbst reingeschrieben und nicht über den Objektinspektor erstellt (wär auch gar ned möglich). Je nach dem was du tun willst musst du den Code an einer anderen Stelle platzieren oder diese Methode aufrufen.

lg elundril

_________________

This Signature-Space is intentionally left blank.
Bei Beschwerden, bitte den Beschwerdebutton (gekennzeichnet mit PN) verwenden.

No0B · Beiträge: 62

Beim Buttonclick soll form 2 geöffnet werden und nur der Text angezeigt werden.
Wenn ichs über die Toolpalette erstelle TLabel kommt mein text nur beim anklicken.

markieren

Delphi-Quelltext

1:	procedure TForm1.Label1Click(Sender: TObject);

Moderiert von Narses: Delphi-Tags hinzugefügt

elundril · Verfasst: Do 08.04.10 21:51

Dann schreib das

markieren

Delphi-Quelltext

1:	Label1.Caption := 'Text1'#13#10'Text2';

ins TForm2.FormShow(Sender: TObject);.

lg elundril

_________________

This Signature-Space is intentionally left blank.
Bei Beschwerden, bitte den Beschwerdebutton (gekennzeichnet mit PN) verwenden.

No0B · Beiträge: 62

Ja so gehts.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme