Einzelnen Beitrag anzeigen

Blubbel

Registriert seit: 6. Okt 2011
125 Beiträge
 
Delphi 2010 Professional
 
#1

Speichern der Canvas

  Alt 12. Okt 2011, 08:32
Delphi-Version: 5
Hallo und guten Morgen.

Es tut mir wirklich leid dass ich euch wieder mal Störe und vielleicht auch nerve.
Ich habe jetzt folgendes Problem:
Ich möchte den Grapgen den ich gezeichnet habe Speichern, und Zwar so, dass ich mir den Speichpfad immer wieder selber aussuchen kann. Habe es bis jetzt so lösen können, dank google :
Delphi-Quellcode:
procedure TForm1.btnSaveClick(Sender: TObject);
var
  Bitmap : TBitmap;
begin
  if SaveDialog1.Execute then
    begin
      Bitmap:=TBitmap.Create;
      Try
        Bitmap.Width:=Image1.ClientWidth;
        Bitmap.Height:=Image1.ClientHeight;
        BitBlt(Bitmap.Canvas.Handle,0,0,Bitmap.Width,Bitmap.Height,
               Image1.Canvas.Handle,0,0,SRCCOPY);
        Bitmap.SaveToFile(SaveDialog1.FileName + '.bmp');
      Finally
        Bitmap.Free;
      end;
    end;
end;
Nur gibt mir der Compiler immer wieder an, dass SaveDialog.Execute ein undefinierter Bezeichner ist... Auch bei SaveDialog alleine.

Liebe Grüße
  Mit Zitat antworten Zitat