PDA

View Full Version : کسی می دونه Fso که تو Vb بود تو دلفی چه جوریه



محسن شمس
شنبه 07 آبان 1384, 19:46 عصر
کسی می دونه Fso که تو Vb بود تو دلفی چه جوریه

محسن شمس
دوشنبه 09 آبان 1384, 20:23 عصر
یعنی هیچ کی نمی دونه

Naficy
چهارشنبه 11 آبان 1384, 05:57 صبح
آخه عزیز دل برادر، اومدی تو قسمت دلفی، راجع به fso در vb سوال می کنی و هیچ توضیحی نمی دی، اشاره ای هم نمی کنی تا یکی بفهمه داری از چی حرف می زنی. فکر نمی کنی حداقل لازم باشه بگی منظورت از fso چیه؟

Developer Programmer
پنج شنبه 12 آبان 1384, 11:43 صبح
فکر نمی کنی حداقل لازم باشه بگی منظورت از fso چیه؟
fso یعنی file system object که در vb واسه نوشتن اسکریپت استفاده میشد

MiRHaDi
جمعه 13 آبان 1384, 00:48 صبح
سلام
عزیز دقیق بفرما میخواهید در دلفی چه کاری انجام بدهید و صورت سوالتون چیه تا اگه بلد بودیم راهنمایت کنیم
بای

محسن شمس
جمعه 13 آبان 1384, 11:08 صبح
بابا fso یعنی file system object که در vb واسه نوشتن اسکریپت استفاده میشد

من می خواهم روی فایل ها و پوشه ها تغییراتی انجام بدم

مثل حذف پوشه
کپی پوشه
خذف فایل
کپی فایل

vcldeveloper
شنبه 14 آبان 1384, 04:30 صبح
با استفاده از کدی شبیه کد زیر، می تونید یک یا چند فایل یا پوشه را با استفاده از Shell ویندوز کپی یا حذف کنید. برای اطلاعات بیشتر می تونید تابع SHFileOperation را در Windows SDK یا MSDN جستجو کنید.


uses
ShellAPI;
/////////

var
SHFILEOPSTRUCT : _SHFILEOPSTRUCT;
Source, Dest : string;
begin
Source := 'unit1.pas';
Dest := 'copy of unit1.pas';
with SHFILEOPSTRUCT do
begin
Wnd := 0;
wFunc := FO_COPY; {or FO_DELETE or FO_MOVE or FO_RENAME}
pFrom := PAnsiChar(Source);
pTo := PAnsiChar(Dest);
fFlags := FOF_NOCONFIRMATION + FOF_NOCONFIRMMKDIR + FOF_SILENT;
lpszProgressTitle := '';
end;
if SHFileOperation(SHFILEOPSTRUCT) <> 0 then
raise Exception.Create('An error occured in the file operation');
end;

بجای آدرس فایل در متغیرهای Source و Dest، می تونید آدرس یک پوشه را هم بنویسید.
در دلفی هم یکسری تابع ساده برای انجام این کار وجود داره که از Shell برای انجام کارشون استفاده نمی کنند:
DeleteDir (فقط برای پوشه های خالی)
DeleteFile
CopyFile
این توابع در راهنمای دلفی توضیح داده شده اند.

Naficy
سه شنبه 17 آبان 1384, 14:12 عصر
بابا fso یعنی file system object که در vb واسه نوشتن اسکریپت استفاده میشد
اینکه مال ‌vbscript است نه vb؟؟!! (زمین تا آسمون!)
‍ضمنا جالبه؛ شما توvb می رین اسکریپت می نویسین؟!!!!

Developer Programmer
سه شنبه 17 آبان 1384, 14:23 عصر
عزیز دل FSO هم مثل یک اکتیو ایکس یا کامپوننت می مونه
پس لزوما ربطی به اسکریپت نداره! و حتی در دلفی هم میشه استفاده کرد! (هرچند دیگه داره قدیمی میشه)

Naficy
چهارشنبه 18 آبان 1384, 11:41 صبح
معذرت می خوام. من زمانی (8 سال) پیش با vb می نوشتم و هرگز هم از fso استفاده نکردم. برای همین از میزان کاربری و محبوبیتش اطلاعی نداشتم. تصور من این بود که اساسا برای vbscript ساخته شده (جالبه که در help مربوط به vbscript هم دقیقا با همین دید درباره اش بحث شده)
همه اینها به علاوه این تکه از صحبت که "در vb برای اسکریپت نوشتن استفاده می شه" باعث این سوتفاهم شد. (که البته هنوز هم برای من جمله جالبیه!!)

البته در اصل روی صحبت من با شما نبود، با آقای شمس بود که ورداشتند جمله شما را کپی کردند(!!) و لطف کردند یک "بابا" هم سرش چسبوندند!!!

MiRHaDi
دوشنبه 30 آبان 1384, 01:21 صبح
سلام
"بابا" حالا بی خیال :)
حسین جان اگه کارت راه افتاد که حتما با لطف کشاورز عزیز افتاده هیچی اگه نه بگو دقیق چی میخوای سورسشو بدیم
بای