Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansa,
14. Mär 2007
Thx, Oki. Bei dem Umfang, den das Ganze jetzt hat, wäre tatsächlich eine Komponente in Betracht zu ziehen. Muss mal gucken. Allerdings wird das wenn schon dann von TPanel abgeleitet.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansa,
14. Mär 2007
Dann bringe mal Beispiel. Wäre auch eine Möglichkeit.
Da es nur um das erstmalige Anzeigen der Form geht könnte man auch SetCursorPos usw. verwenden. Alles geht irgendwie. :P @Ingo : TShape hat mit einem Label kaum was zu tun und scheidet deshalb aus.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansa,
13. Mär 2007
Vor "Antwort schreiben" bitte Anhänge ansehen oder eben keinen Antwortversuch machen. :mrgreen: Ist aber schon lobenswert, dass hier offensichtlich falsche/dumme Beiträge nicht abgeschickt und wieder "gecanceled" werden. :stupid: Ansonsten : wo ist die Antwort auf die Frage ?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansa,
13. Mär 2007
Posting #4 und Repaint ? Repaint usw. macht überhaupt nichts.
Was ich jetzt mache ? Vorerst nichts, höchstens auf Gegenfragen antworten, solange keine konstruktive Antwort kommt. :mrgreen:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansa,
13. Mär 2007
Neue Frage neuer Thread ist nicht immer produktiv, wie man sieht (ja, 3 Threads, die zusammengehören). :P
Nützt aber jetzt auch nichts mehr.
Guck dir den Soure im Anhang an, oder die EXE/Screenshots. Enter hat in dem Zusammenhang mit der Taste Enter nichts zu tun. Entweder man ist mit der Maus in der Nähe, dann greift MouseEnter oder man steuert das Ganze über die Tastatur. D.h. man...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansa,
13. Mär 2007
Hi,
wieso wird hier :
procedure TfrmKeyTest1.PanelEnter(Sender: TObject);
begin
if (Sender is TPanel) then begin
(Sender as TPanel).Color := clSkyBlue;
Canvas.Pen.Color := clNavy; // Rahmen-Schriftfarbe
Canvas.Pen.Width := PinselBreite;