-
تبدیل کاراکترهای فاکس پرو در ویندوز به نحوی که قابل خواندن باشند (با دلفی)
دوشنبه 31 تیرماه سال 1392 11:14
درصورتی که از دیتابیس فاکس پرو در داس استفاده کنید برای استفاده از ان در ویندوز کاراکتر ها به هم ریخته و ناخوانا میشوند .توابع زیر در دلفی این مشکل را حل میکنند FoxLarge,FoxSmall, WinT, StrDate : string ; function TFmImportInformation.StrRev(StrRev :string):Variant; var i : integer ; Str : string; begin Str := '' ;...
-
خواندن فایل dbf در دلفی
شنبه 29 تیرماه سال 1392 11:36
کامپوننت Ttable روی فرم بندازین خصوصیت Tabletype رو روی ttFoxPro قرار بدین خصوصیت Table name نام فایل dbf به همراه مسیرش رو بدین Active رو True کنید .
-
hash کردن با Indy 10 در دلفی
پنجشنبه 6 تیرماه سال 1392 09:16
با استفاده از کد زیر شما می توانید یک رشته را با دو الگوریتم SAH1 , MD5 که به طور همزمان استفاده میشوند Hash نمایید همچنین با تغییر در برنامه قادر خواهید بود فایل را نیز hash کنید تنها کافی است به جای HashStringAsHex از دستور HashStreamAsHex استفاده کنید . uses idhash,idhashsha, IdHashMessageDigest procedure...
-
دستور مشاهده کل جداول و فیلدها در اوراکل
سهشنبه 20 فروردینماه سال 1392 14:40
با اجرای کد زیر امکان مشاهده فیلدهای جدول مورد نظر در اواراکل را دارید . کد ساده ولی کاربردی امیدوارم به دردتون بخوره . البته تو ایران هنوز زیاد از اوراکل استفاده نمیشه ! select distinct table_name, column_name, data_type || ' (' || decode(data_type,'LONG',null,'LONG RAW',null, 'BLOB',null,'CLOB',null,'NUMBER',...
-
تبدیل عدد به حروف در sql
دوشنبه 2 مردادماه سال 1391 14:00
create FUNCTION dbo.Num_ToWords ( @Number Numeric (38, 0) -- Input number with as many as 18 digits ) RETURNS VARCHAR(8000) AS BEGIN DECLARE @inputNumber VARCHAR(38) DECLARE @NumbersTable TABLE (number int, word VARCHAR(10)) DECLARE @outputString VARCHAR(8000) DECLARE @length INT DECLARE @counter INT DECLARE @loops...
-
تبدیل تاریخ شمسی به حروف در sql
دوشنبه 2 مردادماه سال 1391 13:56
تابع date_to_words با سه پارامتر ورودی که سال و ماه و روز را به صورت رشته ای دریافت و یک رشته برمیگرداند . خود کد واضح و نیاز به توضیح نداره . نظر یادتون نشه . create FUNCTION date_to_words (@year_ as varchar(4),@mon_ as varchar(2),@day_ as varchar(2) ) RETURNS VARCHAR(100) as BEGIN /* declare @year_ as varchar(4)...
-
استفاده از تصویر و موسیقی در Installshield
یکشنبه 20 فروردینماه سال 1391 15:23
قبل از هر چیز فایلهایی که انتخاب میکنید باید دارای پسوندهای زیر باشن وگرنه جواب نمیده و محیط IS به حروف کوچک و بزرگ حساس . تمامی عکسها و تصاویر مورد نیاز، حتما باید با پسوند *.BMP باشند با سایز 1024 در 768 صداها باید Wav یا MIDI باشند فایلهای ویدیویی باید AVI باشند عکسهایی که برای BillBoard نیاز دارید باید با نام Bbrd...
-
موجودی به نام برنامه نویس
شنبه 7 خردادماه سال 1390 13:27
//فرض اینکه همه ورودیها قبلا تعریف شده //زبان انگلیسی من افتزاح باشه پس گیر به لغتاش ندین //این فقط شبه کد procedure mankind var time,Mankind begin read(mankind) //تشخیص برنامه نویس if mankind.IQ<=100 then exit; if (mankind.fashion <> Null) and (mankind.magnate) then exit; if...
-
دانلود نرم افزار دسته بندی کتاب
دوشنبه 19 اردیبهشتماه سال 1390 08:55
سلام دوستان مثلا قرار بود دات نت شروع کنم وسط کار دوباره درگیر یک پروژه دلفی شدم . راستش خودم هم دلفی رو بیشتر دوست دارم . فعلا یک نرم افزار برای مرتب کردن کتابهاتون گذاشتم که امیدوارم مورد استفاده قرار بگیرد. امکاناتی که داره : درج ، ویرایش ، حذف ، کاربرد اسان ، رنگ بندی رکوردها ، جستجو سریع و راحت کتابها البته فعلا...
-
افزودن CHECK BOX به GRID در asp.NET
دوشنبه 16 اسفندماه سال 1389 13:12
برای افزودن Check Box تنها کافی کد زیر در تگ column در grid قرار دهید . همان طور که مشاهده میکنید از TemplateField استفاده شده است . < asp : GridView ID ="GridView1" runat ="server"> < Columns > < asp : TemplateField > < ItemTemplate > < asp : CheckBox ID...
-
رنگ کردن grid در ASP.net با code behind C#
دوشنبه 16 اسفندماه سال 1389 13:08
چند وقتی شروع کردم دارم یک پروژه با Asp و کد C# مینویسم . بعد از دو سال شروع مجدد و کار با این زبان دیدم همه چیز یادم شده . نکته هایی که لازم دارم برای شروع کار وقتی جواب گرفتم اینجا میذارم شاید روزی به کار دوستان بیاد . در اینجا میخوام نحوه رنگ کردن بعضی از رکوردا رو براتون بگم که مطمئنا با تغییرات جزئی میتونید کارای...
-
مخفی کردن فرم و نمایش ایتمها در دلفی
دوشنبه 15 آذرماه سال 1389 11:22
یک کد جالب که با توجه به نیازتون اگر تغییرات لازم بدین کاربرد جالبی میتونه داشته باشه procedure TForm1.FormCreate(Sender: TObject); var FullRgn, ClientRgn, ButtonRgn: THandle; Margin, X, Y: Integer; begin Margin := (Width - ClientWidth) div 2; FullRgn := CreateRectRgn(0, 0, Width, Height) ; X := Margin; Y := Height -...
-
چند دستور در دلفی
دوشنبه 24 آبانماه سال 1389 11:08
یکسری از این دستورات قبلا هم گذاشتم ولی دقیقا نمیدونم کدوم کدا رو گذاشتم . اینا رو توی یک وبلاگ دیدم یک جورایی کپی برداری ولی چون صفحه رو ذخیره کرده بودم ادرس وبلاگ نتونستم پیدا کنم ممکن روزی به درد بخورن 1.Open/close CD ROM Uses mmsystem; mciSendString('Set cdaudio door open wait', nil, 0, handle); to open...
-
یکسری دستورات کاربردی به اسمبلی
پنجشنبه 20 آبانماه سال 1389 09:18
در ادامه مطلب میتونید این بحث ببینید StdGrp group stdlib,stddata stddata segment para public 'sldata' stddata ends ; stdlib segment para public 'slcode' assume cs:stdgrp ; ; ; AddChar- Unions a character into a set. ; ; inputs: ; ; ES:DI- Points at the set (at its mask byte). ; AL- Character to union into the set. ; ;...
-
بازی snake به اسمبلی
پنجشنبه 20 آبانماه سال 1389 09:10
تقریبا همه این بازی جالب انجام دادن کد این بازی با زبان اسمبلی امیدوارم لذت ببرید . البته یک اعتراف کنم من این برنامه رو خودم اجرا نکردم البته امیدوارم خطا نداشته باشه . ;@ SNAKE, Assembly Project ;@ 8:07 PM 6/30/2004 ;===================================Stack Segment stksg segment stack db 32 dup('Stck') stksg ends...
-
حذف فایل با دستورات اسمبلی
پنجشنبه 20 آبانماه سال 1389 08:56
;---------------------------------------------- ;Deleting file ; --------------------------------------------- ermac macro ;//print error message if can't delete file lea dx,errormsg mov ah,09h int 21h endm ;////////////////////////////////// okmac macro ;//print the file deleted succsesfuly if it can delete file lea...
-
ساخت پوشه با دستورات اسمبلی
پنجشنبه 20 آبانماه سال 1389 08:55
;---------------------------------------------- ;CRETING DIRECTORY ; --------------------------------------------- ermac macro ;//print error message if can't creat directory lea dx,errormsg mov ah,09h int 21h endm ;////////////////////////////////// okmac macro ;//print the directory created succsesfuly if it can...
-
چند نمونه کد در دلفی
دوشنبه 17 آبانماه سال 1389 11:55
یک تعداد کد روی سیستم داشتم که اینجا میذارم امیدوارم مورد استفاده دوستان واقع بشه . پاک کردن، کپی کردن و انتقال یک فایل یا فولدر غیر فعال کردن Task Manager بدست آوردن تعداد فایل های موجود در سطل آشغال به همراه سایز آنها بدست آوردن نام Cpu و سرعت آن فرمت درایو اجرای Task Manager مشخص نمودن اجراء بودن یک پروسس غیر فعال...
-
دانلود کردن یک فایل از اینترنت
یکشنبه 9 آبانماه سال 1389 11:12
سورس کد زیر را می توانید برای دانلود یک فایل از طریق اینترنت استفاده نمائید . فراموش نکنید که در ابتدای برنامه حتما یونیت اشاره شده در ابتدای سورس را فراخوانی کنید uses ExtActns, ... type TfrMain = class(TForm) ... private procedure URL_OnDownloadProgress (Sender: TDownLoadURL; Progress, ProgressMax: Cardinal;...
-
تشخیص پلتفورم ویندوز
یکشنبه 9 آبانماه سال 1389 11:11
دلفی چند ثابت برای این کار دارد مثلا برای تعیین پلتفورم ویندوز از کد زیر استفاده می کنیم : if Win32Platform = VER_PLATFORM_WIN32_NT then begin کدتان را وارد کنید // end Else if Win32Platform = VER_PLATFORM_WIN32_WINDOWS then begin کدتان را وارد کنید // end;
-
نحوه برقراری ارتباط دلفی با رجیستری ویندوز!!!!!!!!
یکشنبه 9 آبانماه سال 1389 11:10
شما برای کار با رجیستری در دلفی نیاز به تعریف و نوشتن هیچ کلاس و متد و آبجکت ندارید شرکت برای کار با رجیستر یه یونیت با همین نام Registry ارائه داده است برای کار با رجیستر شامل کلاس TRegistry که دارای روال ها و تابع های خاصی مثل CreateKey یا WriteString یا DeleteKey یا MoveKey یا ReadFloat و....میباشد. نحو اصلی کار با...
-
منشاء علائم رایانهای را بشناسید
شنبه 1 آبانماه سال 1389 17:00
گزارشی از تاریخچه یا منشاء نشانه های رایانه ای اخیرا منتشر شده است. نشانه هایی که روزانه هزاران بار از آنها استفاده می کنیم اما شاید نگاه یا ذهنمان تنها چند صدم ثانیه درگیر فکر کردن به آنها شود. نشانه های مختلفی که به منظور دادن دستورهای متفاوت به رایانه ها مورد استفاده قرار می گیرند را امروزه می توان در هر جا ، بر...
-
تعریف علمی برنامه نویس
سهشنبه 19 مردادماه سال 1389 10:01
برنامه نویس موجودیست زنده که اغلب بصورت نشسته با کمی خمیدگی روبروی خود را نگاه می کند. این موجود توانایی بسیار زیادی در گیر دادن به یک موضوع و پلک نزدن را داراست. بیشتر طول عمر خود را بدون تحرک سپری می کند و فقط انگشتانش دارای فعالیت بسیار زیاد هستند. غالبا بصورت انفرادی یافت می شود و در پاسخ به مخاطب همواره می گوید:...
-
چرا error 404 ?!!
شنبه 16 مردادماه سال 1389 12:00
صفحه ی 404 این صفحه که تقریبا اکثر سایت ها و وبلاگ ها اون رو دارند، یکی از پر بازدید ترین صفحات اینترنته. این ارور هنگامی بروز میکنه که لینک مورد نظرمون در دسترس نباشه و یا پاک شده باشه. اگه دلتون میخواد بدونین که چرا این صفحه 404 نام گرفته این پست رو بخونید . معنی این ارور آشکار است ، ومعمولا وقتی ظاهر میشود که صفحه...
-
برنامه ماشین حساب با دلفی
یکشنبه 3 مردادماه سال 1389 09:55
یک برنامه کامل ماشین حساب که با زبان دلفی نوشته شده است امیدوارم مورد استفاده دوستان قرار گیرد( نظر یادتون نشه). دانلود برنامه ماشین حساب
-
کیفیت و استانداردهای ژاپنی ها
پنجشنبه 17 تیرماه سال 1389 09:27
چند سال پیش، آی بی ام تصمیم گرفت که تولید یکی از قطعات کامپیوترهایش را به ژاپنیها بسپارد. در مشخصات تولید محصول نوشته بود سه قطعه معیوب در هر ۱۰۰۰۰قطعه ای که تولید می شود قابل قبول است. هنگامیکه قطعات تولید شدند و برای آی بی ام فرستاده شدند، نامه ای همراه آنها بود با این مضمون مفتخریم که سفارش شما را سر وقت آماده کرده...
-
سرعت اینترنت در ایران (طنز تصویری)
یکشنبه 13 تیرماه سال 1389 09:16
-
sort clientdataset در دلفی
سهشنبه 1 تیرماه سال 1389 14:58
کد زیر عمل مرتب سازی بر روی کلاینت دیتاست را انجام میدهد . ( نظر یادتون نشه ) procedure SortClientDataset(Column: TDBGridColumnItem;grid:tdbadvgrid;ClientDataSet:TClientDataSet); var andstr:string; i:integer; begin try andstr:=''; if (trim(Column.FieldName ) ='') then exit; if...
-
دفترچه تلفن به زبان C++
سهشنبه 25 خردادماه سال 1389 13:37
کد زیر یک برنامه ساده دفترچه تلفن است که به زبان C++ نوشته شده است امیدوارم مورد استفاده دوستان قرار بگیرد . برنامه خیلی ساده که امکان نمایش ، ویرایش ، جستجو و حذف را داراست . تمامی بخش های کد کاملا گویا است . در این برنامه یک ساختار تعریف شده که اطلاعات ان از ورودی دریافت میشود که این کار در تابع record صورت میگیرد ....
-
ده شغل برتر دنیا به نقل از مجله MONEY !!
چهارشنبه 8 اردیبهشتماه سال 1389 15:29
مجله MONEY و سایت Salary . com طى تحقیقات گسترده آمارى در کشور آمریکا یک لیست 50 تایی از برترین مشاغل را تهیه کردند. البته معیار انتخاب این مشاغل گزینه هایى چون بدون استرس بودن ، منعطف پذیرى ، بروز خلاقیت و داشتن زمینه ترقى را شامل مى شود. 10 شغل برتر این لیست: شغل دهم: روانشناس درصد رشد:14/19% پایه حقوقى: متوسط...