Delphi |
ez a betötéses tma nekem nem működik!
Vajon miért kérem segítsen valaki!
előre is kösz
Mostmár megy a betöltés is...
Rakj le a Dialogból egy OpenPictureDialog-ot meg egy SavePicture-t.
Aztán adj a menühöz még egy mentés és egy betöltés pontot. Kattints rá a betöltésre és másold be ezt:
procedure TForm1.Megnyits1Click(Sender: TObject);
begin
if OpenPictureDialog1.Execute then begin
Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;
end;
Aztrán a mentésre és ezt:
procedure TForm1.Ments1Click(Sender: TObject);
begin
if SavePictureDialog1.Execute then begin
Image1.Picture.SaveToFile(SavePictureDialog1.FileName);
end;
end;
Összedobtam a szövegszerkesztőt, meg a képszerkesztőt és lett egy sikeresen mentő, és betöltő programom Vagy nem... Azt irja ismeretlen képtipus a jpg
De a mentés legalább megy
Elmentette rendesen a képet
Donatus: persze, hogy vacillál, mert Rooter-ral ellentétben én azt mondom, hogy nem tudja mit csinál. El kell olvasni először papírról
Tegyünk ide egy változót - miért oda?
Értéke legyen boolean - az nem az értéke, hanem a típusa
then zen )))))))))))))))))
lehet írni halt, form1.close. de mi a különbség?
Beírom, de miért azt??????, mit jelentenek azok vazze?