Ergebnis der Suchanfrage

• Forum: Multimedia

  AW: Canvas - > Bitmap

   
    by Bummi, 23. Jul 2012
  implementation
  function GetBitmap(Width : Integer; Heigth : Integer) : TBitmap;
  var
  Bitmap : TBitmap;
  begin
  // Wie könnte Ich
  Bitmap := TBitmap.Create(Self);
  // wie greife Ich auf die Schnittstelle zu und lasse auf mein Bitmap zeichnen?
  FExportCanvas := Bitmap.Canvas;
  try
• Forum: Multimedia

  AW: Canvas - > Bitmap

   
    by Bummi, 23. Jul 2012
  Ist das eine eigene Komponente, bzw. eine Komponente die Du im Source hast, wenn ja würde ich im Paint das Canvas einmal abstrahieren
  
  var
  c:TCanvas;
  begin
  if Assigned(FExportCanvas) then c := FExportCanvas else c := Canvas;
  end;
  
  
  und alle Zeichenausgaben auf c biegen. Ein Invalidate genügt dann um auf dem Bitmap.Canvas zu malen.