Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by TheAn00bis,
14. Dez 2004
Danke! Eine letzte Frage sei mir erlaubt: Wie kann ich jetzt in das 2. Feld der Combobox auch noch ein Rechteck zeichnen?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by TheAn00bis,
14. Dez 2004
Danke, shmia, Fehler kommt jetzt keiner mehr :), aber es erscheint auch kein Rechteck. Ich weiß jetzt noch nicht einmal, wonach ich frage müsste... , deshalb habe ich, in der Hoffnung, dass sich jemand die Mühe macht einfach mal das Beispiel angehägt. Es enthält die Combobox, mit dem Code.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by TheAn00bis,
14. Dez 2004
Auch bei (control as TComboBox).Canvas.Rectangle(Rect); bleibt der Fehler der selbe:
Wenn ich statt des "Rect" Zahlen einsetze erscheint keine Fehlermeldung, aber das darf ich ja nicht.
Gibt es keine Möglichkeit auch das noch irgendwie hinzubiegen?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by TheAn00bis,
13. Dez 2004
Vielen Dank schonmal,
es ist mir schon fast peinlich, aber ich weiß nicht, wie ich folgenden, letzten Fehler beheben kann:
Canv.Rectangle(Rect);
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by TheAn00bis,
13. Dez 2004
Etwas so:
procedure TStyle.ComboBox1DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
var Canv: TCanvas;
begin
Canv := TCanvas.create;
Canv.handle := GetWindowDC(0);
InflateRect(Rect, -1, -1);
control.Canv.Pen.color := clRed;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by TheAn00bis,
13. Dez 2004
Wenn ich deinen Code nehme, erscheinen folgendee Fehler:
(60 - 61 sind die ersten Zeilen deines Codes.)
OwnerDraw ist aktiviert. Kann es and Delphi4 liegen? Weiß jemand Rat?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by TheAn00bis,
13. Dez 2004
Hi,
wie kann ich auf eine Kombobox zeichnen?
Ich weiß, dass die Kombobox den Style CSOwnerDraw (Fixed, oder Variable?) haben muss und, dass der Code für das Zeichnen in DrawItem kommt.
Wenn ich
procedure TStyle.ComboBox1DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);