برای این منظور کافی است یک edit یا label در فرم چاپی خود قرار داده و فونت آن را تغییر دهید

فونت بارکد با نام Codebarlarg.ttf یا Codebarmedium.ttf  را می توانید از لینک زیر دانلود کنید .

فونت بارکد

فكر مي كنم شما هم فهميدن كه به تازگي گروه Embarcadero نگارش جديدي از دلفي را بنام Delphi XE وارد بازار كرده است .

Embarcadero® Delphi® XE سريعترين راه براي تحقق بالاتري توانايي و بالاتري سرعت در برنامه هاي طراحي شده براي ويندوز است .

كاهش يافتن مدت زمان مورد نياز براي كدنويسي تا پنج برابر با استفاده از توسعه كامپوننت هاي اساسي بصورت كاملا  ويژال .

 افزايش سرعت در سراسر برنامه هاي چندگانه ويندوز و پايگاههاي اطلاعاتي مبتني بر :

برنامه هايي با واسط گرافيكي (GUI desktop applications)‌ ،

طراحي شده براي صفحه لمسي (interactive touch-screen) ،‌

كيوسكها (kiosk) ،‌

برنامه نويسي چند لايه (database-driven multi-tier) ،

تكنولوژي ابر (cloud) ،

تحت وب (Web applications)

شما مي توانيد :

• با استفاده از كامپوننت هاي از قبل ساخته شده  با سرعت بيشتر نسب به قبل برنامه هاي خودتان را بسازيد.
• بسازيد برنامه هاي كه نياز دارند به سرعت بالا براي دسترسي به اطلاعات ،‌ كنترل كردن بلادرنگ سخت افزار ،‌ دستكاري كردن در آبجكت هاي 3D ،‌ ساختارهاي مالي ، بازي ، تصوير سازي ،‌ تجهيزات پزشكي ،‌ پايانه هاي فروش و ...
• تكنولوژي Future-proof براي برنامه هاي شما با استفاده از اتصال محلي به 9 پايگاه داده بزرگ و كامپوننت هاي از قبل آماده براي ارتباط ابري (cloud connectivity)
• بكارگيري هزاران كامپوننت رايگان و تجاري براي كاربران اينترفيس ، پايگاه داده ، چند لايه ، تحت وب ، صنعتي و ...

دلفي XE در نگارش هاي Professional  ،‌ Enterprise و Architect موجود است .

قابليت هاي كليد دلفي XE  :

• RAD IDE with fast drag-and-drop design
• More than 500 visual controls
• Built-in touch and gesturing support
• dbExpress with support for 9 major databases
• DataSnap n-tier middleware with JSON, REST, HTTP, HTTPS, COM, and XML
• Debugging support for multi-threaded applications
• UML / code metrics and audits
• Integrated tool chest for performance profiling and build automation
• Subversion integration for source code management
• Cloud deployment to Amazon EC2 and work with Windows Azure cloud data storage
• Target Windows 2000, XP, Vista, and Windows 7 from single source
• Access to previous Delphi versions (7, 2007-2010) included
• Centralized license management and tool deployment with Embarcadero ToolCloud

براي دانلود دلفي ايكس اي اينجا كليك كنيد

Database table to XML and back

تبديل اطلاعات ديتابيس به فايل ايكس ام ال و بلعكس

در اين آموزش درباره ايجاد فايل ايكس ام ال با خواندن اطلاعات از جدول پارادوكس و همچنين درج اطلاعات يكسان داخل جدول از اطلاعات خوانده شده از فايل ايكس ام ال (يا هر ديتابيسي كه در دلفي در دسترس شماست) بحث خواهيم كرد. اين كد براي جدول ها با فيلد Memo كار نخواهد كرد . ما از MS XML Parser براي تجزيه سند ايكس ام ال استفاده مي كنيم بنابراين بايد IE5.0 يا ورژن جديدتر آن را روي سيستم خود نصب داشته باشيد .

 برای دیدن متن کامل روی ادامه مطلب کلیک کنید

برای مثال : فکوس اولین Edit یک پنل

معمولا در فرم های که شامل تعداد زیادی  کنترلهای ویرایشی نظیر Edit , List ,Radio butten,check box  و غیره مباشند از کنترلهای مجموعه ای نظیر TGruopBox  یا TPanel  استفاده می شود.

مشکل اصلی در زمان ورود اطلاعات این است که با ورود به هر یک از این کنترل ها مجموعه ای کرسر موس باید در اولین فیلد طراحی شده قرار گیرد تا ورود اطلاعات راحتر باشد .

برای این منظور می توانید از پراسیجر زیر استفاده کنید .

procedure FocusFirstEntryControl(const container : TWinControl) ; 
  

var
  

  index : integer; 
  

begin  

  for index := 0 to -1 + container.ControlCount do
  

  begin
  

    if container.Controls[index] is TWinControl then 
  

    begin
  

      TWinControl(container.Controls[index]).SetFocus; 
  

      Break; 
  

    end;
  

  end; 
  

end;
  

برای مثال اگر تعداد چند فیلد روی یک GroupBox  قرار گرفته است کافی است از دستور زیر استفاده کنید :

FocusFirstEntryControl(GroupBox1) ;

چه کار می کنید وقتی که یک باگ پیش بینی نشده در برنامه تون پیدا می شود؟

باگها اتفاق می افتند . ما نیاز داریم اطلاعاتمان را برای رفع کردن کردن آنها گسترش بدهیم . اما گاهی اوقات ما به بن بست می رسیم.

گاهی اوقات به روش های بامزه ای مثل نادیده گردفتن باگها می اندیشیم . وانمود می کنیم به پیدا شدن باگ در سورس کد ما بحدی هولناک است که می میریم . البته خدا نکنه L

آیا شما ایده جالبی دارید . چه می کنید وقتی که کاربران برنامه شما تماس می گیرن و می گین : "ما در برنامه شما خطا پیدا کردیم ".

درخواست خودآزمایی :

یک آزمون با 10 تا سوال طراحی کنید و از کابرانتان بخواهید جواب آنها را به ایمیل شما بفرستند.

در دست ساخت :

به کاربران بگویید که قابلیت های قطعی برنامه در دست ساخت است و تحت نگارش بروزشده در اختیار ایشان قرار می گیرد.

فرمت درایو C:

به کاربر بگویید :" شما باید سیستم عامل و برنامه را مجددا نصب کنید . آیا این اطلاعاتی در این زمنیه دارید؟"

گاهی اوقات کاربردی ترین روشه ;)

باگ در حقیقت یک ویژگی پیش بینی نشده است.

زمانی که باگی رخ می دهد راه خوبی برای ایجاد کردن کدهای بیشتر در حدود باگ رخ داده. در این روش باگ در بین دگیر کدها پنهان خواهد شد (شاید هم از بین برود).

انکار کردن :

بگوید : "خوب . هرگز چنین چیزی ممکن نیست" .

تبدیل باگ به قابلیت :

چند مرحله برای مستندسازی از باگ های رخ داده در برنامه ایجاد کنید. باگ ها رخ داده را با درج تاریخ در این مستندات ذخیره کنید . حالا باگ تبدیل به یک قابلیت برنامه شده و بخش فروش خطا های رخ داده را اعلام کرده تا در نگارش های آپدیت حل شود .

در این مقاله فقط قصد داشتیم شما را به تفکر بیشتر دعوت کنیم .

اگر دوست داشتید در قسمت نظرات روش های برخورد خودتون با باگ های رخ داده را بنویسید

در مقاله قبلي (   مديريت آرايه اي از كامپوننت هاي مشابه در دلفي ) روش دسترسي به يك گروه از كامپوننت هاي مشابه از طريق ذخيره مرجع هر يك از آنها را در داخل يك عنصر از آرايه آموختيد .

ايجاد آرايه اي از كامپوننت ها در زمان اجراي برنامه

در بيشتر موارد ظاهر برنامه را در زمان طراحي با استفاده از IDE مي سازيد . اما مواردي هم وجود دارد كه نياز به ايجاد كامپوننت ها در زمان اجراي برنام داشته باشيد .

يك فرم ورود اطلاعات برنامه بانك اطلاعاتي را در نظر بگيريد . شما مي توانيد با نوشتن يك تابع نام  جدولي از بانك اطلاعاتي را انتخاب و براي هر فيلد از جدول يك DBEdit (يا TEdit) ايجاد كنيد . چنين فرم ورود اطلاعاتي جهت ويرايش هر جدولي مي تواند استفاده شود.

از اين طريق شما مي توانيد تمام DBEdit ها را در يك آرايه ذخيره كنيد و يك دستور اعتبارسنجي براي هر يك از DBEdit ها اجرا كنيد.

گروهي از كامپوننت ها يا كنترل هاي مشابه بهم ،‌ چيزي كمتر از يك آرايه از كامپوننت ها نيست . شما مي توانيد به عناصر يك آرايه بوسيله ايندكس دسترسي داشته باشيد . در مورد آرايه ي كامپوننت ها هر عنصر از آرايه به منزله يك كامپوننت مي باشد . (مانند : Tbuttonيا  TLabel)

دو علت مهم براي استفاده از آرايه كامپوننت ها در دلفي وجود دارد :

• دسترسي (تغيير خصوصيات) و مديريت (رويدادهاي مشترك) گروهي از كامپوننت ها (جاي گرفته روي فرم در زمان طراحي)  بوسيله ايندكس
• دسترسي و مديريت گروهي از كامپوننت ها بوسيله ايندس در زمان اجرا

در هر دو مورد هدف پردازش برخي از كدها براي كامپوننت هاي آرايه در يك حلقه مي باشد .

در اين مبحث دسترسي به يك گروه از كامپوننت ها بوسيله ذخيره آنها در آرايه را مي آموزيم .

براي ديدن كل مبحث ادامه مطلب را كليك كنيد.

اگر بدنبال راه سريعي براي از كار انداختن (يا فعال كردن) تنظيمات ويندوز هستيد و يا قصد داريد كاربر ويندوز عاجز از برخي تنظيمات نظير نمايش كنترل پنل يا خاموش كردن سيستم شود اين مقاله را مطالعه كنيد .

ريجستري (Registry) چيست ؟

ريجستري بانك اطلاعات ساده اي است كه يك برنامه مي تواند براي ذخيره و بازيابي اطلاعات پيكربندي (نظير آخرين اندازه پنجره و موقعيتش ، اختيارات كاربر و اطلاعات يا هر داده پيكربندي ديگري) استفاده كند. همچنين ريجستري شامل اطلاعاتي درباره ويندوز و پيكربندي آن نيز مي باشد .

TRegistry

در دلفي كلاس Tregistry (تعريف شده در يونيت Registry) شامل بسته اي است براي رجيستري سيستم و توابعي كه براي پردازش رجيستري لازم است .

ابزارهاي رجيستري ،‌ حقه ها و شگردها

مي خواهيد دسترسي به تنظيمات نمايش را از غير ممكن كنيد ؟

احتياج به مخفي كردن ميزكار ويندوز داريد؟

مايليد دكمه Shout Down را غير فعال كنيد ؟

همه محدوديت مذكور را مي توانيد با ابزار ويرايشگر ريجستري كه در ويندوز وجود دارد انجام دهيد . با استفاده ازRegedit.exe  مي توانيد اطلاعات ريجستري را مشاهده ، جستجو و ويرايش نماييد .

ساده ترين راه براي اجراي regedit كليك كردن بروي دكمه Start ، انتخاب Run و تايپ عبارت Regedit در پنجره باز شده مي باشد . البته من قصد ندارم نحوه كار با Regedit را توضيح بدم ولي اگر مايليد اطلاعات بيشتري در اين زمينه داشته باشيد بهتر از راهنماي ريجستري 'Registry Guidr for Windows' در سايت ماكروسافت ديدن كنيد .

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

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

قبل از اينكه كد دلفي را پيشنهاد بديم ، اجازه بدهيد بصورت دستي دكمه Shutdown از منوي Strart حذف كنيم :

1. Regedit را اجرا كنيد .

2. به مسير (HKEY_Current_User/Software/Microsoft/Windows/CurrentVersion/Policies) برويد . توجه داشته باشيد كه كليدهاي فرعي نظير Explorer بايد قبلا در اينجا ايجاد شده باشند .

3.كليد Explorer را باز كنيد .

4. ارزش جديدي از نوع DWORD به نامه "NoClose" (بدون نشانه ") اضافه كنيد و مقدار آن را برابر با يك قرار دهيد . توجه داشته باشيد داده با ارزش يك به معناي روشن بودن و داده با ارزش صفر به معناي خاموش بودن مي باشد .

5. جهت اعمال تغييرات ممكن نياز به راه اندازي مجدد ويندزو باشد .

ابزارهاي ريجستري ،‌ حقه ها و شگردها با استفاده از دلفي

حالا كه ما مي دانيم به چطوري بايد همه آيكون هاي موجود بر روي ميزكار ويندوز را مخفي كنيم ، اجازه بديد اين وظيفه را از طريق كد دلفي انجام بدهيم :

uses registry;

...

procedure Explorer_NoClose(const YesNo : boolean);

const 

  RegPolicies = 

    '\Software\Microsoft\Windows\CurrentVersion\Policies\';

  SubKey = 'Explorer\';

  YesNo10 : array[False .. True] of Word = (0, 1);

begin

  with TRegistry.Create do

  try

    RootKey:=HKEY_CURRENT_USER;

    if OpenKey(RegPolicies + SubKey, True) then

      WriteInteger('NoClose',YesNo10[YesNo]);

    CloseKey;

  finally

    Free;

  end;

end;

بله به همين سادگي !!! ديگه نيازي به فرخواني ويرايشگر ريجستري نيست . فقط تابعي نظير Explorer_NoClose(True) را فراخواني كنيد و دكمه Shoutdown در از منوي Satrt مي رود .

در ادامه مطلب ليستي شامل برخي از ارزشهايي براي از كارانداختن عملكردهاي مختلف ويندوز جهت اضافه كردن در ريجستري ذكر شده است :

PDF این مقاله رو می تونید از اينجا دریافت کنید