Ib Jakobsen <senator@post.tele.dk> wrote:
>
> Jeg sender lige denne igen. TDCs server var gået ned, og jeg kan ikke se
> mit indlæg selv. Undskyld hvis den er der alligevel.
>
> Jeg har et lille problem jeg roder med. Min erfaring med Delphi er ret
> kort. Men opgaven jeg søger hjælp til er som følger. På en form skal
> indsættes et bitmap og skrives i et memo-felt. Et vilkårligt billede
> hentes, og en tekst skrives i memofeltet. Dette skal så gemmes med samme
> filnavn, og henholdsvis som *.bmp og *.txt. Næste gang de hentes skal
> man angive et filnavn. her lidt af koden.
I følge din kode (som du så vidt jeg kan se ikke har kopieret direkte fra
programmet (FYH, skamme sig ;) )), bliver begge filer gemt med det samme
navn. Du har brug for funktionen "ChangeFileExt()":
if SavePictureDialog1.Execute then begin
// Først gemmer vi billedet...
imgbillede.Picture.SaveToFile(SavePictureDialog1.Filename);
// Så gemmer vi teksten som "*.txt"...
Memo1.Lines.SaveToFile(ChangeFileExt(SavePictureDialog1.Filename, 'txt'));
end;
MVH, René
--
Using Virtual Access
http://www.vamail.com