سلامنقل قول:
فكر كنم كلا مطلب را نگرفتيد.
كافيه VCLZipD7_3.dpk را داخل دلفي باز كنيد(روي فايل دابل كليك كنيد تا توسط دلفي باز شود) ، بعد توي پنجره باز شده اول Compile و بعد Install را بزنيد.
Printable View
سلامنقل قول:
فكر كنم كلا مطلب را نگرفتيد.
كافيه VCLZipD7_3.dpk را داخل دلفي باز كنيد(روي فايل دابل كليك كنيد تا توسط دلفي باز شود) ، بعد توي پنجره باز شده اول Compile و بعد Install را بزنيد.
NoneForce عزيز نصب شد! :26:
بالاخره با راهنمايي هاي شما و سماجت خودم نصب شد!
يه مشكل واقها عجيب بود!
هي پيغام خطا ميداد كه :
cannot load package 'VCLZIPD7_3'. It Contains unit ;'kpZcnst,' which is also contained in package 'dclusr70' اديگه اون روي سگ منو بالا آورد! منم رفتم تو پوشه اي كه دلفي نصبه سرچ كردم فايله رو پيدا و پاك كردم! بعد به آسوني آب خوردن VclZip رو نصب كردم! :18:
به خاطر تمام راهنماييهاي شما بسيار ممنونم :11:
با سلام...
مي خواستم طريقه بدست آوردن سريال Biosيا Cpu رو دوستان لطف كنن :)
با تشكر
سلامنقل قول:
کد:http://torry.net/pages.php?id=235
من چند تا مشکل دارم لطفا راهنماییم کنید :
1 – توی دلفی 1 فورم که میسازم بیشتر مواقع اصلا Run نمیشه و پیام میده که قادر نیست برنامه رو کامپایل کنه . اگه از تمام اجزا کپی بزنم توی 1 فرم دیگه اجرا میشه و بعد از مدت کمی مثل قبل می شه . مشکل مجاست ؟؟؟
2- توی دلفی می تونم شکل ترسیم کنم . مثلا 1 جدول بکشم
3- من 1 دونه ComboBox دارم . می خوام وقتی که هر کدوم از گزینه هاش انتخاب شد کپشن 1 لیبل بر عوض بشه . آیا این کدی که من نوشتم اشنباه هست ؟؟
کد :
نقل قول:
procedure TForm1.ComboBox1Change(Sender: TObject);
var i:string;
begin
i:=ComboBox1.Items[ComboBox1.ItemIndex];
case i of
'string1':Label1.Caption:='payam1';
'string2':Label1.Caption:='payam2';
'string3':Label1.Caption:='payam3';
'string4':Label1.Caption:='payam4';
else
Label1.Caption:='Error'
end;
end;
من چند تا مشکل دارم لطفا راهنماییم کنید :
1 – توی دلفی 1 فورم که میسازم بیشتر مواقع اصلا Run نمیشه و پیام میده که قادر نیست برنامه رو کامپایل کنه . اگه از تمام اجزا کپی بزنم توی 1 فرم دیگه اجرا میشه و بعد از مدت کمی مثل قبل می شه . مشکل مجاست ؟؟؟
2- توی دلفی می تونم شکل ترسیم کنم . مثلا 1 جدول بکشم
3- من 1 دونه ComboBox دارم . می خوام وقتی که هر کدوم از گزینه هاش انتخاب شد کپشن 1 لیبل بر عوض بشه . آیا این کدی که من نوشتم اشنباه هست ؟؟
کد :
نقل قول:
procedure TForm1.ComboBox1Change(Sender: TObject);
var i:string;
begin
i:=ComboBox1.Items[ComboBox1.ItemIndex];
case i of
'string1':Label1.Caption:='payam1';
'string2':Label1.Caption:='payam2';
'string3':Label1.Caption:='payam3';
'string4':Label1.Caption:='payam4';
else
Label1.Caption:='Error'
end;
end;
من چند تا مشکل دارم لطفا راهنماییم کنید :
1 – توی دلفی 1 فورم که میسازم بیشتر مواقع اصلا Run نمیشه و پیام میده که قادر نیست برنامه رو کامپایل کنه . اگه از تمام اجزا کپی بزنم توی 1 فرم دیگه اجرا میشه و بعد از مدت کمی مثل قبل می شه . مشکل مجاست ؟؟؟
2- توی دلفی می تونم شکل ترسیم کنم . مثلا 1 جدول بکشم
3- من 1 دونه ComboBox دارم . می خوام وقتی که هر کدوم از گزینه هاش انتخاب شد کپشن 1 لیبل بر عوض بشه . آیا این کدی که من نوشتم اشنباه هست ؟؟
کد :
نقل قول:
procedure TForm1.ComboBox1Change(Sender: TObject);
var i:string;
begin
i:=ComboBox1.Items[ComboBox1.ItemIndex];
case i of
'string1':Label1.Caption:='payam1';
'string2':Label1.Caption:='payam2';
'string3':Label1.Caption:='payam3';
'string4':Label1.Caption:='payam4';
else
Label1.Caption:='Error'
end;
end;
من چند تا مشکل دارم لطفا راهنماییم کنید :
1 – توی دلفی 1 فورم که میسازم بیشتر مواقع اصلا Run نمیشه و پیام میده که قادر نیست برنامه رو کامپایل کنه . اگه از تمام اجزا کپی بزنم توی 1 فرم دیگه اجرا میشه و بعد از مدت کمی مثل قبل می شه . مشکل مجاست ؟؟؟
2- توی دلفی می تونم شکل ترسیم کنم . مثلا 1 جدول بکشم
3- من 1 دونه ComboBox دارم . می خوام وقتی که هر کدوم از گزینه هاش انتخاب شد کپشن 1 لیبل بر عوض بشه . آیا این کدی که من نوشتم اشنباه هست ؟؟
کد :
نقل قول:
procedure TForm1.ComboBox1Change(Sender: TObject);
var i:string;
begin
i:=ComboBox1.Items[ComboBox1.ItemIndex];
case i of
'string1':Label1.Caption:='payam1';
'string2':Label1.Caption:='payam2';
'string3':Label1.Caption:='payam3';
'string4':Label1.Caption:='payam4';
else
Label1.Caption:='Error'
end;
end;
ظاهرا كه مشكلات بد جوري اذيتتون كرده! چرا 4 پست؟
1- كد خطا رو بنويسيد
2- بله، با استفاده از كلاس TCanvas. اما اگر هدفتون رو توضيح بديد شايد راه هاي بهتري هم باشه
3- بله اشتباه هست. چون در حالت عادي نميشه string رو در عبارت case استفاده كرد (با كد نويسي شدني هست)
متغير i رو integer تعريف كنيد و مقدارش رو با خصوصيت itemindex چك كنيد
موفق باشيد
از دوستان اگه ممکن است نمونه سورس برای کامپوننت TVideoGrabber.v7.2.4n یا ورژن های دیگر البته بالاتر بگذارید .