PDA

View Full Version : مبتدی: درایو نصب ویندوز


space_
سه شنبه 18 فروردین 1394, 10:19 صبح
می خواستم بدونم از کجا میشه فهمید ویندوز تو کدوم درایو نصب شده؟ فقط اسم درایو ویندوز رو می خوام . مرسی
pezhvakco
سه شنبه 18 فروردین 1394, 11:48 صبح
جستجو بهترین راه به دست آوردن پاسخ ها تون است =>

var
pwindowsdir : array [0..250] of char;
begin
GetWindowsDirectory(pwindowsdir,255);
edit4.Text:=StrPas(pwindowsdir);
end;
space_
سه شنبه 18 فروردین 1394, 12:13 عصر
جستجو بهترین راه به دست آوردن پاسخ ها تون است =>

var
pwindowsdir : array [0..250] of char;
begin
GetWindowsDirectory(pwindowsdir,255);
edit4.Text:=StrPas(pwindowsdir);
end;





ممنون - سرچ هم کردم ولی مثل کدی که شما گذاشتید به جای اسم خود درایو میره تو مسیر C:\Windows من فقط اسم درایو رو میخوام
دلفــي
سه شنبه 18 فروردین 1394, 12:35 عصر
ممنون - سرچ هم کردم ولی مثل کدی که شما گذاشتید به جای اسم خود درایو میره تو مسیر C:\Windows من فقط اسم درایو رو میخوام




procedure TForm1.Button1Click(Sender: TObject);
var
DriveName:Char;
pwindowsdir : array [0..250] of char;
begin
GetWindowsDirectory(pwindowsdir,255);
DriveName := pwindowsdir[0];
end;