---

Først tak for svaret Uffe det løste problemet.

Da jeg ikke i mine bøger kan finde noget om navneforandring tillader jeg mig
at spørge igen.

procedure TForm3.RadioButton5Click(Sender: TObject);
begin
Image2.Picture.SaveToFile('C:\Liljer\Navne\'+
ListBox2.Items[ListBox2.ItemIndex]+'.JPG');
Form2.Memo1.Lines.SaveToFile('C:\Liljer\Navne\'+
ListBox2.Items[ListBox2.ItemIndex]+'.Txt');
end;

Filerne til henholdsvis Image og Memo'en forefindes.
Navnene på disse ønskes ændret, mener det er noget med Rename
men hvordan gør man det ??

mvh Henning

---

Hej Henning

Du kan bruge RenameFile, som returnerer False hvis filen af en eller anden
grund ikke kan/må omdøbes. Eksempel:

if not RenameFile(FilNavn, Nyt_FilNavn) then
begin
ShowMessage('Filen kunne ikke omdøbes');
end;

Mvh. Flozzy

"Henning Madsen" <HKM@madsen.tdcadsl.dk> skrev i en meddelelse
news:44de3000$0$3494$edfadb0f@dread11.news.tele.dk...
> Først tak for svaret Uffe det løste problemet.
>
> Da jeg ikke i mine bøger kan finde noget om navneforandring tillader jeg
> mig at spørge igen.
>
> procedure TForm3.RadioButton5Click(Sender: TObject);
> begin
> Image2.Picture.SaveToFile('C:\Liljer\Navne\'+
> ListBox2.Items[ListBox2.ItemIndex]+'.JPG');
> Form2.Memo1.Lines.SaveToFile('C:\Liljer\Navne\'+
> ListBox2.Items[ListBox2.ItemIndex]+'.Txt');
> end;
>
> Filerne til henholdsvis Image og Memo'en forefindes.
> Navnene på disse ønskes ændret, mener det er noget med Rename
> men hvordan gør man det ??
>
> mvh Henning
>