Ufak bir edit işlemi

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
gloryboy
Üye
Mesajlar: 26
Kayıt: 21 Eki 2006 10:40

Ufak bir edit işlemi

Mesaj gönderen gloryboy »

arkadaşlar editboxta yazılan yazının sağdan itibaren ilk noktanın sağındaki harfler lazım :)

yani

edit1.text := 'c:\deneme\merhaba.mp3' burda .mp3 bölümü lazım bana yada merhaba.mp3 bölümüde olabilir

nasıl alırım :oops:
En son gloryboy tarafından 05 Oca 2007 09:29 tarihinde düzenlendi, toplamda 1 kere düzenlendi.
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

Kod: Tümünü seç

Var
  Uzanti : String;
begin
  Uzanti := ExtractFileExt( 'c:\deneme\merhaba.mp3'  );
  ShowMessage( Uzanti );
end;
:wink:
Resim
Resim ....Resim
gloryboy
Üye
Mesajlar: 26
Kayıt: 21 Eki 2006 10:40

Mesaj gönderen gloryboy »

hehe harikasınız ya :D

peki abi deneme.mp3 olarak bulabilirmiydim ?
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

Kod: Tümünü seç

ExtractFileName( );
ayrıca sormadan söyleyim ExtractFilePath ve ExtractFileDrive da var. Hatta ChangeFileExt de...

- Bunların isimlerinden anlam çıkartırsın.. 8)
Resim
Resim ....Resim
gloryboy
Üye
Mesajlar: 26
Kayıt: 21 Eki 2006 10:40

Mesaj gönderen gloryboy »

çok teşekkürler :)
Cevapla