Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stoermi,
2. Dez 2004
Okay, hab es jetzt hin bekommen!
Hab immer versucht mit brush.color rumzudoktern und nicht an brush.stylegedacht.
Jetzt funktioniert es, wie gewollt.
Trotzdem danke noch mal!
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stoermi,
2. Dez 2004
Hab grad noch mal etwas rumprobiert - und jetzt funktioniert es doch...
Aber, das Problem liegt jetzt darin, dass ich ja auf meinem HotelPlan nicht nur ein Zimmer zeichnen möchte, sondern alle Zimmer des Hotels.
Das heißt, ich müßte ja verschiedene Bitmaps aus den vorhandenen ZimmerObjekten in die PaintBox kopieren.
Kann man es realisieren, dass mir aus dem Bitmap nur das Polygon für das...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stoermi,
1. Dez 2004
Okay, ist ne Möglichkeit. Aber TLabel wird ja nicht direkt in die PaintBax gezeichnet, sondern auf das Formular, wo auch eine PaintBox vorhanden ist. Die Überschneiden sich dann nur. Das sollte ja gehen, oder?
Damit kann ich im moment nichts anfangen. Heißt das, die Klasse Zimmer soll ein Canvas-Objekt bekommen, oder wie? Und wie bekomme ich das dann auf das Formular?
Ja, dass dachte ich...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stoermi,
1. Dez 2004
Alos ich habe keinen Timer deklariert.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stoermi,
1. Dez 2004
Die Zimmernummer ist eigentlich immer die selbe. Das wundert mich ja gerade. Eine Fehlermeldung kommt nicht.
Wenn er das Label aber nicht immer neu erstellt, warum läuft der Prozessor dann so hoch? Nehm ich oben genannten Code raus, passiert das nicht!
Und warum zittert das Label dann? So ne Art blinken.
Liegt es vielleicht daran, das das Label oben auf einer PaintBox drauf liegt?
Also...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stoermi,
1. Dez 2004
Nein hab ich noch nicht.
Aber wie ist das:
Die Prozedur hat noch mehr Code. Bevor das label erstellt wird, wird in eine PaintBox im selben Formular ein Polygon eingezeichent. Dieses wird jedoch nicht immer wieder neu gezeichnet?
Deshalb nehme ich an, dass die Prozedur auch nicht immer wieder neu geladen wird. Oder flällt das bei einem Polygone einfach nicht auf.
Ich werde jetzt mal ver...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by stoermi,
1. Dez 2004
Hallo!
Ich erstelle mit folgendem Quell-Code ein Label:
newLabel := TLabel.Create(nil);
with newLabel as TLabel do
begin
Parent := HotelForm.TabSheet2;
Name := 'Label_'+zimmerNummer;