Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Bomberbb,
3. Aug 2007
Auf den Canvas möchte ich eigendlich nich verzichten, da ich mit der neuen Klasse meine momentan im Programm befindlichen Paintboxen ersetzen will. Und da hatte ich einen riesigen Aufwand an Anpassungen...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Bomberbb,
3. Aug 2007
Nun ich habe es momentan so:
var
Zeichenflaeche:TCanvas;
BitBltBitMap:BBitmap;
Procedure TPaintPanel.Paint;
Begin //----- Paint -----
BitBltBitmap.width := Self.Width;
BitBltBitmap.height := Self.Height;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Bomberbb,
3. Aug 2007
Hallo, ich mochte eine neue Komponente erstellen, sie BitBlt von haus aus unterstützt.
Ich habe die Komponente nun von TCustomPanel abgeleitet und habe mir nun gedacht, ich könnte einen neuen Canvas erstellen, dan ich dann als Hauptzeichenfläche der Komponente registriere und dann am Ende der Procedure paint den origianl Canvas per BitBlt auf den neuen werfe. Aber ich bekomme es nicht hin,...