OpenDialog

[aveysel]

Arkadaşlar OpenDialog nesnesi ile seçtiğim bir öğenin sadece adını ve uzantısını almak istiyorum örnegin: oku.txt gibi

Ancak
OpenDialog1.Files.Text
yazdığımda bana bu nesnenin yolunu da veriyor örneğin: c:\belgelerim\oku.txt

Ben sadece oku.txt yazısını almak istiyorum, ne yapmalıyım ???

[Sedat Atif]

ExtractFileName(OpenDialog1.FileName);

şeklinde denediniz mi?

[Sedat Atif]

O şekilde değil de aşağıdaki gibi kullanırsanız sorun çıkmaz sanırım. Bende çıkmıyor yani extractfilename kısmı sadece dosya adı ve uzantısını alması için.

procedure TForm1.Button1Click(Sender: TObject);
begin
if opendialog1.Execute then
begin
edit1.Text:=extractfilename(opendialog1.FileName);
end;
end;

[webaytek]

MediaPlayer için dosya seçtirmek istiyorum.
bir opendialog koydum. adi:=ac
ac.execute;
olan düğmeye basıyorum dosya seçersem ve tamam dersem sorun yok ama güsel de iptal deyince yata veriyor!!!!
Nasıl engelleyebilirim - ya da kendi hata mesajımı nasıl ekleyebilirim?

[TRSoft]

Muhetmelen OpenDialogu çalıştırıyorsunuz ama seçim yapılıp yapılmadığını kontrol etmeden mediaplayer ile açmaya çalışıyorsunuz ve dosya olmayınca hata alıyorsunuz..

Execute fonksiyonu boolean tipinde veri döndürür. Yani seçim yapmadıysanız False yaptıysanız True olur..
Öyleyse

Kod: Tümünü seç

If Ac.Execute Then
Begin
................./Seçildiyse kodlarını yaz
..............
End else
Begin
         ShowMessage('Dosya Seçilmedi');
End;

gibi bir kod ile istediğinizi yapabilirsiniz.

[webaytek]

teşekkürler