Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Schwedenbitter,
23. Aug 2008
Danke für die Hinweise. Kann sie grad nicht ausprobieren, weil ich kein Delphi zu Hand / auf dem PC habe.
Ich habe ein Formular mit einem TImage. In diese wird mittels DelphiTwain ein Bild eingelesen und auch angezeigt. Das möchte ich dann natürlich speichern und weil Bitmap zu groß ist, möchte ich es als jpeg packen...
Den Codevorschlag von DeddyH werde ich nachher - spätestens heute Abend...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Schwedenbitter,
22. Aug 2008
Kann mir bitte auch mal jemand helfen. Ich wollte kein neues Thema aufmachen, weil es hier gut her passt und bestimmt jemand eine Antwort parat hat. Ich habe folgendes geschrieben. In Image1 ist ein Bild drin (sichtbar). Aber meine jpg-Datei ist immer leer (0 Bytes).
Was ist bei mir falsch?
procedure TForm1.Button3Click(Sender: TObject);
Var
Jpg :TJPEGImage;
begin
If Not...