راز شب 14
نرم افزار - شعر - عـکس
 
 

جهت turn off يك دكمه بر روي فرم قرار مي دهيم و در رخداد كليك آن دستور زير را تايپ مي كنيم .


ShellExecute(Handle, 'Open',PChar('shutdown.exe'), PChar('-s -c "HeHeHe - your about to get;(shutdown! :D"'), nil, SW_SHOW


ارسال شده در تاریخ : چهار شنبه 26 مهر 1390برچسب:, :: 12:10 :: توسط : رضا بوالحسنی

اگر سیستم شما بیش از یک درایو سی دی رام داشته باشد نحوه دسترسی به درایو دوم یا سوم متفاوت است.

 mciSendString('open cdaudio!X: alias driveX', nil, 0, 0);
 mciSendString('set driveX door open wait', nil, 0, 0);

به جای X نام درایو را وارد کنید(فقط در سطر اول)

برای بستن نیز:

mciSendString('set driveX door closed wait', nil, 0, 0);

 

نمونه برنامه :



procedure TMain.open_cdrom(Sender: TObject);
var
  i:integer;
  s:string;
begin
   s:=trim(ComboBox4.Text);//combobox4 =name cd rom
   i:=pos(':\',s);
   Delete(s,i,2);
   label18.Caption:=s;
   mciSendString(pansichar('open cdaudio!'+S+' alias drive'+s), nil, 0, 0);
   mciSendString(pansichar('set drive'+s+' door open wait'), nil, 0, 0);
end;

procedure TMain.close_cdrom(Sender: TObject);
var
  s:string;
begin
  s:=trim(label18.Caption);
  mciSendString(pansichar('set drive'+s+' door closed wait'), nil, 0, 0);
end;


ارسال شده در تاریخ : چهار شنبه 26 مهر 1390برچسب:, :: 12:6 :: توسط : رضا بوالحسنی

shellexecute(handle,'open','http://stcomputer.rozblog.com/',nil,nil,sw_show);//merci

or

shellexecute(handle,'open',pansichar(edit1.text),nil,nil,sw_show);//merci


ارسال شده در تاریخ : یک شنبه 16 مهر 1390برچسب:, :: 11:25 :: توسط : رضا بوالحسنی

 
procedure clear_Edits;
var
cnt :  integer;
begin
for cnt := 0 to ComponentCount - 1 do
begin
if  Components[cnt].ClassName = 'TEdit'  then
TEdit(Components[cnt]).Clear
end;

ارسال شده در تاریخ : دو شنبه 20 شهريور 1390برچسب:, :: 11:56 :: توسط : رضا بوالحسنی

برای دریافت کد به ادامه مطلب برید



 ادامه مطلب...

ارسال شده در تاریخ : دو شنبه 20 شهريور 1390برچسب:, :: 11:11 :: توسط : رضا بوالحسنی

با کلیک بر روی عنوان Title هر ستونDBGrid می توانید اطلاعات درون  آن را مرتب کنید .

برای این کار کافیست در رويداد TitleClick مربوط به شی DBGrid کد زیر را بنويسيد :

procedure TSherkatListF.DBGrid1TitleClick(Column: TColumn);1   
begin
;  ADOTable1.Sort:=Column.FieldName
 ;  end


ارسال شده در تاریخ : دو شنبه 20 شهريور 1390برچسب:, :: 10:18 :: توسط : رضا بوالحسنی

procedure TForm1.Button1Click(Sender: TObject);
var
  shell: Variant;
begin
  shell := CreateOleObject('Shell.Application');
  shell.ShutdownWindows;
end

ارسال شده در تاریخ : دو شنبه 20 شهريور 1390برچسب:, :: 9:38 :: توسط : رضا بوالحسنی

در اين مقاله ياد خواهيد گرفت که چگونه با استفاده از کد نويسي در دلفي Activex يا dll مورد نياز برنامه خود را در دستگاه کاربرانتان نصب کنيد.
براي رسيدن به اين هدف از دستور regsvr32.exe استفاده مي کنيم.



 ادامه مطلب...

ارسال شده در تاریخ : یک شنبه 19 شهريور 1390برچسب:, :: 22:30 :: توسط : رضا بوالحسنی

چگونه از فايلهاى PDF در دلفى استفاده كنيم؟



 ادامه مطلب...

ارسال شده در تاریخ : یک شنبه 19 شهريور 1390برچسب:, :: 22:28 :: توسط : رضا بوالحسنی

در اين مقاله طريقه اجرا يا باز کردن نرم افزار هاي خارج از محيط دلفي را با استفاده از تابع API ويندوز ShellExecute را ياد خواهيد گرفت.



 ادامه مطلب...

ارسال شده در تاریخ : یک شنبه 19 شهريور 1390برچسب:, :: 22:21 :: توسط : رضا بوالحسنی

برخي مواقع بعضي از برنامه هاي شما احتياج به خواندن اطلاعات از روي CD را دارند. قبل از اجراي برنامه مي توان با استفاده از دستورات مختلفي مانند FileExists وجود CD مورد نظر در CD-Rom را بررسي كرد و در صورت صحيح بودن آن برنامه را اجرا كرد.



 ادامه مطلب...

ارسال شده در تاریخ : یک شنبه 19 شهريور 1390برچسب:, :: 22:16 :: توسط : رضا بوالحسنی

محيط دلفي براي برنامه نويسي يكي از بهترين محيطهاي برنامه نويسي است گذشته از كاركرد داخلي و كمپايلر آن كه بسيار قوي و سريع است، محيط آن يعني IDE آنهم قدرت بسيار زيادي دارد كه باعث شده يكي از بهترين اديتورها باشد. در اين مقاله من سعي بر اين داشته ام تا با ارائه يك سري از نكات و كليدهاي ميانبر كه مي توانند براي كار در دلفي بسيار مفيد و كارا باشند، كمك كنم تا شما بتوانيد با قدرت بيشتر به برنامه نويسي و كار در اين محيط قدرتمند ادامه دهيد.



 ادامه مطلب...

ارسال شده در تاریخ : یک شنبه 19 شهريور 1390برچسب:, :: 22:15 :: توسط : رضا بوالحسنی

اين مقاله مناسب كاربراني مي باشد كه استفاده زيادي از گرافيك در برنامه هاي خودشان مي كنند. توسط اين مقاله مي توانيد تا يك تصوير نقشه بيتي را در داخل صفحه با زواياي مختلف بچرخانيد .



 ادامه مطلب...

ارسال شده در تاریخ : یک شنبه 19 شهريور 1390برچسب:, :: 22:12 :: توسط : رضا بوالحسنی

با سلام

Microsoft Agent يكي از سرگرم كننده ترين فن آوريهاي Microsoft مي باشد كه تا كنون توانسته بسيار مورد علاقه كاربران قرار بگيرد. Agentها به برنامه هاي شما جذابيت زيادي مي دهند و امكان ارتباط بهتر و جالبتري را با كاربر ايجاد ميكنند. در اينجا من مي خواهم شما را با Microsoft Agent و طريقه بكار گيري آن در برنامه هاي خودتان را آموزش بدهم كه اميدوارم مفيد باشد. از آنجايي كه من اين امكان را در دلفي استفاده كرده ام براي شما هم مثالهاي دلفي آورده ام ...



 ادامه مطلب...

ارسال شده در تاریخ : یک شنبه 19 شهريور 1390برچسب:, :: 22:10 :: توسط : رضا بوالحسنی

يكي از فرمتهاي محبوب وب است و به راحتي مي توان برايflash ساخت Interfaceها در برنامه از آن استفاده كرد. بعضي از برنامه نويسان معتقدند استفاده از Flash سبب سنگين شدن برنامه، وابستگي برنامه به ActiveX فلش، امكان نداشتن تبادل اطلاعات بين Flash و دلفي و مشكلات ديگري مي شود.
در اين مقاله خواهيد ديد كه به راحتي تمامي اين مشكلات را مي توانيد رفع كنيد.



 ادامه مطلب...

ارسال شده در تاریخ : یک شنبه 19 شهريور 1390برچسب:, :: 22:6 :: توسط : رضا بوالحسنی

يكي از مشكلاتي كه بسياري از تازه كاران در دلفي با آن مواجه مي شوند اجراي فايلهاي ديگر يا اجراي دستورات shell است.



 ادامه مطلب...

ارسال شده در تاریخ : یک شنبه 19 شهريور 1390برچسب:, :: 22:1 :: توسط : رضا بوالحسنی

صفحه قبل 1 2 صفحه بعد

درباره وبلاگ
سلام به وبلاگه من خوش امدید لطفا ایمیلتون رو توی خبرنامه وبلاگم پبت کنید تا زمانی که آپ کردم بهتون خبر بدم و خواهشا توی نظر سنجی وبلاگم شرکت کنید . مرسی
آخرین مطالب
نويسندگان
پيوندها

تبادل لینک هوشمند
برای تبادل لینک  ابتدا ما را با عنوان راز شب 14 و آدرس raze-shabe14.LXB.ir لینک نمایید سپس مشخصات لینک خود را در زیر نوشته . در صورت وجود لینک ما در سایت شما لینکتان به طور خودکار در سایت ما قرار میگیرد.






ورود اعضا:

نام :
وب :
پیام :
2+2=:
(Refresh)

<-PollName->

<-PollItems->

خبرنامه وب سایت:





آمار وب سایت:  

بازدید امروز : 2
بازدید دیروز : 2
بازدید هفته : 10
بازدید ماه : 188
بازدید کل : 56812
تعداد مطالب : 79
تعداد نظرات : 396
تعداد آنلاین : 1

Alternative content