klasör silme

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
delphikursu
Üye
Mesajlar: 99
Kayıt: 24 Tem 2004 05:13
Konum: kayseri
İletişim:

klasör silme

Mesaj gönderen delphikursu »

aslında ben klasör simeyi yaptım sorun şu sileçeğim klasör açık olası windowsda klasör acıksa silmiyor ya klasörü acıksa kapatmam lazım yada hata vermeden silmesini sağlamak benim kullandığım kod .





function DelDir(dir: string): Boolean;
var
fos: TSHFileOpStruct;
begin
ZeroMemory(@fos, SizeOf(fos));
with fos do
begin
wFunc := FO_DELETE;
fFlags := FOF_SILENT or FOF_NOCONFIRMATION;
pFrom := PChar(dir + #0);
end;
Result := (0 = ShFileOperation(fos));
end;

deldir('c:\aaa');
Kullanıcı avatarı
Murat DİCLE
Kıdemli Üye
Mesajlar: 702
Kayıt: 19 Nis 2006 04:12
Konum: İstanbul
İletişim:

Mesaj gönderen Murat DİCLE »

ilk önce FindWindow ile öyle bir klasör ekranda açıkmı bak. sonra açık ise zaten FindWindow sana o penceenin handle bilgisini döndürecektir. Ve gelen handle bilgisine PostMessage ile WM_CLOSE mesajını çekeceksin..
Kullanıcı avatarı
tuanna
Üye
Mesajlar: 582
Kayıt: 06 Ara 2004 05:01
Konum: Ankara
İletişim:

Mesaj gönderen tuanna »

Küçük bir kode blogu yazabilirmisiniz...
Siz hayal edin...Biz yapalım TuannaSoft...
Cevapla