<-BlogAndPageTitle->

آدرس وبلاگ عوض شده.برای ورود کلیک کنید به وبلاگ روی لینک

<-BlogAndPageTitle-> learn cloob learncloob registry computer shabake girl woman delphi c sharp کلوب آموزش کامپیوتر رجیستری شبکه دلفی دلفی 7 سی سی++ سی شارپ دختر ایرونی XXX free proxy پسر learn cloob learncloob registry computer shabake girl woman delphi c sharp کلوب آموزش کامپیوتر رجیستری شبکه دلفی دلفی 7 سی سی++ سی شارپ دختر ایرونی XXX free proxy پسر آموزش دلفی 7

آموزش دلفی 7

منوي اصلي

موضوعات

آرشيو ماهانه

نويسنده

لينکدوني

پيوندها

جستجو

دانلود

نمایش فرم ها در دلفی همراه با افکت

هیچ می دونستید در دلفی می توان بدون داشتن هیچ کامپوننت یا خاصی فرم ها را با افکت های مختلف نشون داد؟

برای انجام این کار در رویداد OnCreate فرمی که می خواهید با افکت باز بشه خط زیر را اضافه کنید :

AnimateWindow(Form1.Handle, 300, AW_Center);

البته بهتره بدونید که فقط همین یه دونه افکت نیست ، پارامتر سوم پردازه بالا نوع افکت رو مشخص می کنه ، اگه رو اون کلید Ctrl+Space رو بزنید از لیستی که باز می شه می تونید افکت های دیگه رو انتخاب کنید . همچنین پارامتر دوم زمان طول کشیدن افکت رو بر حسب میلی ثانیه مشخص می کنه . پارامتر اول هم هندل (شماره منحصر به فردی که ویندوز به هر پنجره اختصاص می ده) فرمیه که می خواهید با افکت نشون داده بشه

نوشته شده توسط محمد امین مسیبی در یکشنبه 29 اردیبهشت1387

لينك مطلب

ایجاد فرم شیشه ای یعنی فرمی که پشتش معلومه

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

Function TransForm(wnd:Longint; Perc:Integer):Longint;
var
j:Longint;
begin
j := GetWindowLong(wnd, GWL_EXSTYLE);
j := j Or WS_EX_LAYERED;
SetWindowLong( wnd, GWL_EXSTYLE, j);
SetLayeredWindowAttributes (wnd, 0, Perc, LWA_ALPHA);
End;

و برای فعال شدن آن:

TransForm(form1.Handle ,150);

نوشته شده توسط محمد امین مسیبی در جمعه 27 اردیبهشت1387

لينك مطلب

سورس ماشین حساب

ابزار لازم:۱۷ عدد bitbtn

۱ عدد Edit

سورس:

unit U_Calc1;
{A simple calculator -
Do not change button names Btn0- Btn9 as the digits 0 -9 are extract from the
4th position of the name in a common routine}

.......................

برای مشاهده ی کامل روی "ادامه ی مطلب" کلیک کنید.

مشخصات:یک سورس کامل.بدون عکس(کپی از متن:مجاز)

(اگر علایم کمی جا به جا هست،درستش کنید)

نوشته شده توسط محمد امین مسیبی در شنبه 21 اردیبهشت1387

لينك مطلب

ارتباط دادن برنامه به رجیستری(ثبت و دریافت اطلاعات از رجیستری)

ببینید دوستان برای اینکه شما بتوانید با رجیستری در ارتباط باشین اول می بایست رجیستری را به برنامه خود معرفی کنیم یعنی ................

برای مشاهده ی کامل روی "ادامه ی مطلب" کلیک کنید.

مشخصات:۵۰ خط+۱ تصویر(کپی از متن:مجاز)

نوشته شده توسط محمد امین مسیبی در جمعه 20 اردیبهشت1387

لينك مطلب

چگونه می توان یک فیلد Memo را در DBGrid ویرایش کرد؟

function TCustomDBGrid.GetEditLimit: Integer;
begin
Result := 0;

  if Assigned(SelectedField) and (SelectedField.DataType in [ftString, ftWideString, ftMemo]) then
    Result := SelectedField.Size;
end;

function TCustomDBGrid.GetEditText(ACol, ARow: Longint): string;
begin
  Result := '';
  if FDatalink.Active then
  with Columns[RawToDataColumn(ACol)] do
    if Assigned(Field) then
      Result := Field.AsString;
  FEditText := Result;
end;

نوشته شده توسط محمد امین مسیبی در جمعه 20 اردیبهشت1387

لينك مطلب

آموزش کامل آرایه‌ها در دلفی

دلفی به ما امکان می دهد آرایه‌هایی از هر نوع متغییری را ایجاد کنیم. برای تعریف آرایه به صورت زیر عمل میکنیم:

کد:

  var 
  array[indexType1, ..., indexTypen] of baseType;
 
                            برای دیدن ادامه،روی ادامه ی مطلب کلیک کنید

نوشته شده توسط محمد امین مسیبی در چهارشنبه 18 اردیبهشت1387

لينك مطلب

یک مطلب برای بچه های حرفه ای

چندتا دستور

تغییر عکس backgroun در دسکتاپ

کپي برداري از مطالب وبلاگ فقط با ذکر منبع مجاز ميباشد .