Entwickler-Ecke :: Thema anzeigen - Merkwürdiges

Rio - Di 15.10.02 12:58
Titel: Merkwürdiges - Label

Ich habe ein merkwürdiges Problem mit label:

Die Prozedur
[code]procedure TForm1.start(Sender: TObject);
begin
canvas.Rectangle(100,100,400,400);
label1.Caption:='hallo';
end;[/code]
funktioniert beim ersten Aufruf(ButtonClick). Beim zweiten Aufrufen wird das Label nicht mehr angezeigt. Das Label liegt im Bereich des Rechteckes - das soll so sein! Ich benötige keine Lösung über TextOut. Ich möchte das Label sichtbar machen.

Wer weiß Rat?

Danke Rio

LCS - Di 15.10.02 13:39

Hi
Schreib einfach mal noch ein Label1.Refresh dahinter, dann sollte das funktionieren.

Gruss Lothar

Tante - Di 15.10.02 13:39

Hallo!

Mit

Quelltext

1:
2:
3:

canvas.Brush.Style:=bsclear;
canvas.Rectangle(100,100,400,400);
label1.Caption:='hallo';

würde es gehen. Aber dann wird kein Hintergrund mehr für das Rechteck gezeichnet. Reicht Dir das? Oder brauchst Du den Hintergrund?

Rio - Di 15.10.02 13:55
Titel: Hintergrund

Vielen Dank, Tante,

aber leider muss das zuvor im Rechteck gezeichnete gelöscht werden. Ich habe eine Form, auf der verschiedene Komponenten liegen, die z.T. durch Label bezeichnet werden. Weil die Lage der Graphikobjekte variabel gestaltet ist, muss letztlich die gesamte Form gelöscht werden. Geht das mit brush?

gruss Rio

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!