Forum: Object-Pascal / Delphi-Language
by GroZ,
24. Sep 2015
Ich weiß war noch von nem anderen versuch^^ ist mittlerweile schon geändert :)
Forum: Object-Pascal / Delphi-Language
by GroZ,
24. Sep 2015
Sehr Gut klappt danke :D
Jetzt nur noch Radiergummi und öffnen dann bin ich fertig :D
Forum: Object-Pascal / Delphi-Language
by GroZ,
24. Sep 2015
procedure TForm1.Speichern1Click(Sender: TObject);
var Bitmap: TBitmap;
begin
Bitmap := TBitmap.Create;
Bitmap.Width := Paintbox1.Width;
Bitmap.Height := Paintbox1.Height;
Bitmap.Canvas.CopyRect(Bounds(0,0,bitmap.Width, Bitmap.Height),
PaintBox1.Canvas, PaintBox1.ClientRect);
Bitmap.SaveToFile('Pfad\Test.bmp');
Forum: Object-Pascal / Delphi-Language
by GroZ,
24. Sep 2015
Hab XP :D Habe zwar immernoch Bluffering (wenn das so heißt) aber das zu beheben wäre für mich zu kompliziert. ^^
Na am liebsten wäre es das ich wenn ich auf Speichern drücke der Dialog kommt.
Forum: Object-Pascal / Delphi-Language
by GroZ,
24. Sep 2015
Das muss ich verneinen ich kann die Größe ändern wie ich will und es bleibt das bild. Kann man die Bitmap mit dem SaveDialog speichern? würde das gerne zur Laufzeit bestimmen wo ich die speichere
Forum: Object-Pascal / Delphi-Language
by GroZ,
24. Sep 2015
kompiliert wird das nicht:P
Bin bloß langsam überfordert und finde auch nix wie ich die Paintbox bzw das Canvas speichern kann...
Forum: Object-Pascal / Delphi-Language
by GroZ,
24. Sep 2015
Heyho ich bins mal wieder.
Ich brauche erneut eure Hilfe.
Ich hab ein MiniPaint programmiert was auch so gut wie fertig ist. Bloß möchte ich jetzt noch Speichern. Meine Frage ist nun wie speicher ich das mit dem SaveDialog?
Ich habe ein Menü eingebaut und dann öffne ich wenn ich auf Speichern drücke den SaveDialog.
Wenn ich dann den Dateinamen eingebe sehe ich die Datei nicht.
procedure...