Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Selbstgemaltes Bild Abspeichern

    Delphi
    by igel457, 12. Feb 2006
  Konnte nicht funktionieren, habe ein wenig mist gebaut:
  procedure TForm1.Button1Click(Sender: TObject);
  var bitmap:TBitmap;
  begin
  bitmap := TBitmap.Create;
  bitmap.width := clientrect.Right;
  bitmap.height := clientrect.Bottom;
  bitmap.canvas.copyrect(clientrect,Canvas, clientrect);
  bitmap.savetofile('c:\test.bmp');
  bitmap.free;
• Forum: Multimedia

  Re: Selbstgemaltes Bild Abspeichern

    Delphi
    by igel457, 11. Feb 2006
  Wenn du direkt auf das Formular gezeichnet hast, dann ist das mit dem Speichern nicht einfach.
  
  Du könntest allerhöchstens folgendes Probieren:
  
  
  var bitmap:TBitmap;
  begin
  bitmap := TBitmap.Create;
  bitmap.width := canvas.width;
  bitmap.height := canvas.height;