-
آموزش Mysql
سهشنبه 27 تیرماه سال 1391 22:01
با سلام در این آموزش قصد داریم شما را با دستور update و روش استفاده آن آشنا کنیم. همانطور که می دونید این دستور برای ویرایش به کار می رود به شکل زیر: UPDATE tablname SET FIELD = VALUE //// UPDATE TABLE SET `country` = 'iran' /// UPDATE table SET `country` = 'iran', `city` = 'Borazjan' //// update table set total...
-
آموزش Mysql
یکشنبه 25 تیرماه سال 1391 23:47
با سلام در این اموزش قراره از Alter بگم Alter پارامتر زیاد داره کم کم این آموزش کامل میشه برای تغییر ترتیب شماره دریف اتوماتیک از کد زیر استفاده می کنم ALTER TABLE table AUTO_INCREMENT = 1900; حذف یک فیلد از جدول ALTER TABLE table name drop column column name تغییر نوع فیلد ALTER TABLE tablename change oldcolumnname...
-
آموزش Mysql
پنجشنبه 22 تیرماه سال 1391 23:14
سلام حتما تا حالا بر خورد کرده اید به این که فیلد های یک دیتابیس ؟؟؟؟ برخورد کرده اید. به این دلیله که نوع یونیکد لاتین هست و دیتا فارسی. حالا اگه شما بخوایین یک جستجو کنید باید چی کار کنید؟ SELECT CONVERT(Filedname USING utf8) FROM tblname با این دستور علاوه بر تبدیل نوع فیلد را نیز مشخص می کند برای زمان از متغیر و...
-
آموزش Mysql
چهارشنبه 21 تیرماه سال 1391 22:50
با سلام دستور Case فکر کنم case همه میشناسند و تا اونجایی که من خبر دارم در اکثر زبانهای برنامه نویسی هستش! caseواقعا کاربردش زیاده CASE case_value WHEN when_value THEN statement_list [WHEN when_value THEN statement_list ] ... [ELSE statement_list ] END CASE مثال یک فایل به نام Stu داریم که به جای مقطع تحصیلی عدد...
-
آموزش Mysql
شنبه 17 تیرماه سال 1391 15:56
سلام از این به بعد سعی می کنم هر چند وقت چند تا از دستورات Mysql به صورت نا منظم براتون بزارم قفل کردن جدول برای یک عمل خاص شما میتونید جدول های دیتابیستون محدود کنید برای مثال در یک دیتابیس 2 تا جدول دارید t1,t2 میتونید کاری کنید که فقط بشه از جدول t1 کاربر بخونه و فقط در جدول t2 بتونه insert یا درج کنه Lock tables...
-
[ بدون عنوان ]
شنبه 17 تیرماه سال 1391 15:33
-
شیعه یعنی...
جمعه 5 خردادماه سال 1391 13:29
ای جوانمردان! جوانمردی چه شد؟ شیوة رندی و شبگردی چه شد؟ بندگی تنها نماز و روزه نیست آب تنها در میان کوزه نیست کوزه را پر کن ز آب معرفت تا در او جوشد شراب معرفت حرف حق را از محقق گوش کن وز لب قرآن ناطق گوش کن بعداز آن بشنو ز «نظم أمرکم» تا شوی آگاه بر اسرار خم خم تو را سرشار مستی میکند بینیاز از هرچه هستی میکند...
-
تعیین گروهی از رکوردهای جدول
سهشنبه 11 بهمنماه سال 1390 22:20
Normal 0 false false false EN-US X-NONE FA به سه روش میتوان گروهی از رکوردها را در جدول تعیین کرد که عبارتاند از: 1ـ استفاده از خاصیت Filter 2ـ استفاده از رویداد OnFilterRecord 3ـ استفاده از متد SetRange استفاده از خاصیت Filter در این روش مراحل ایجاد فیلتر به صورت زیر است: 1ـ خاصیت Filtered را به مقدار True تغییر...
-
نمونه کد کار با system restor
پنجشنبه 6 بهمنماه سال 1390 19:15
در کد زیر کار با system Restore point ویندوز را یاد خواهید گرفت. دسترسی به اخرین تغییرات در ویندوز نکته:در ویندوز 7 Run as Admin… فراموش نشود program WMIShowRestorePoints; ///www.delphiplus.ir /// wwww.lear4u.blogsky.com {$APPTYPE CONSOLE} uses SysUtils ,ActiveX ,ComObj ,Variants; function...
-
تسلیت شهادت
شنبه 1 بهمنماه سال 1390 19:56
رحلت پیامبر همه جهانیان(ص) و شهادت امام حسن مجتبی (ع) تسلیت باد.
-
صدا زدن اینترنت اکسپلورر از درون دلفی
پنجشنبه 29 دیماه سال 1390 20:07
program IExplor; uses Windows, OLEAuto; procedure OpenInternetExplorer(sURL: string ); const csOLEObjName = 'InternetExplorer.Application' ; var IE : Variant; WinHandle : HWnd; begin if VarIsEmpty(IE) then begin IE := CreateOleObject(csOLEObjName); IE.Visible := true; IE.Navigate(sURL); end else begin WinHandle :=...
-
اجرای فرامین dos و نمایش خروجی
پنجشنبه 15 دیماه سال 1390 23:27
function GetDosOutput(CommandLine: string ; Work: string = 'C:\' ): string ; var SA: TSecurityAttributes; SI: TStartupInfo; PI: TProcessInformation; StdOutPipeRead, StdOutPipeWrite: THandle; WasOK: Boolean; Buffer: array [ 0 .. 255 ] of AnsiChar; BytesRead: Cardinal; WorkDir: string ; Handle: Boolean; begin Result :=...
-
غیرفعال کردن ctrl+n در web browser
چهارشنبه 7 دیماه سال 1390 19:11
procedure TfrmMyBrowser.ApplicationEvents1Message( var Msg: tagMSG; var Handled: Boolean); begin // check if Ctrl-N pressed if (GetKeyState(VK_CONTROL) < 0) and (Msg. Message = WM_KEYDOWN) and (Msg.wParam = Ord('N')) then begin Handled := True; end ; end ;
-
بدست آوردن تمامی عکس های درون یک صفحه وب
چهارشنبه 7 دیماه سال 1390 18:51
uses mshtml, ActiveX, COMObj, IdHTTP, idURI; { .... } procedure GetImageLinks(AURL: string; AList: TStrings); var IDoc: IHTMLDocument2; strHTML: string; v: Variant; x: Integer; ovLinks: OleVariant; DocURL: string; URI: TidURI; ImgURL: string; idHTTP: TidHTTP; begin AList.Clear; URI := TidURI.Create(AURL); try DocURL...
-
آیا url به صورت کامل باز شده است؟
چهارشنبه 7 دیماه سال 1390 14:06
procedure pause(const ADelay: LongWord); var StartTC: DWORD; CurrentTC: Int64; begin StartTC := GetTickCount; repeat Application.ProcessMessages; CurrentTC := GetTickCount; if CurrentTC < StartTC then // tick count has wrapped around: adjust it CurrentTC := CurrentTC + High(DWORD); until CurrentTC - StartTC >=...
-
انسان و الاغ
پنجشنبه 1 دیماه سال 1390 21:41
انسان و الاغ انسان = خواب + خوراک + کار+ تفریح الاغ = خواب + خوراک پس انسان = الاغ + کار + تفریح وبنابرین تفریح – انسان = الاغ + کار بعبارت دیگر انسانی که تفریح ندارد = الاغی که فقط کار می کند ***** معادله ۲ مرد = خواب + خوراک + درآمد الاغ = خواب + خوراک پس مرد = الاغ + درآمد و بنابرین درآمد – مرد = الاغ بعبارت دیگر...
-
قطع کردن امن usb
چهارشنبه 30 آذرماه سال 1390 21:40
safely remove usb function OpenVolume(ADrive: char): THandle; var RootName, VolumeName: string; AccessFlags: DWORD; begin RootName := ADrive + ':' + #134; // ADrive + ':\' kills the syntax highlighting case GetDriveType(PChar(RootName)) of DRIVE_REMOVABLE: AccessFlags := GENERIC_READ or GENERIC_WRITE; DRIVE_CDROM:...
-
آپدیت3 xe2 و radphp
سهشنبه 29 آذرماه سال 1390 21:05
XE3 http://installers.embarcadero.com/update/radstudio/9.0/update3/delphicbuilder_xe2_upd3_win.exe radphp http://altd.embarcadero.com/download/radphp/xe2/radphp_xe2_upd3_win.zip
-
گرفتن عکس از صفحه نمایش
دوشنبه 28 آذرماه سال 1390 23:00
var bmp : Tbitmap; dc : Hdc; begin bmp := Tbitmap.Create; bmp.Width := Screen.Width; bmp.Height := Screen.Height; image1.Width := Screen.Width; image1.Height := Screen.Height; dc := GetWindowDc(GetDesktopWindow); Bitblt(bmp.canvas.handle,0,0,Screen.Width,Screen.height,dc,0,0,srccopy); image1.Canvas.Draw(0,0,bmp);...
-
اضافه کردن فایل به start menu
دوشنبه 28 آذرماه سال 1390 22:56
uses shellobj; SHAddtorecentdocs(SHARD_PATH,pchar('adress file'));
-
اضافه کردن checkbox به dialogbox ها
دوشنبه 28 آذرماه سال 1390 22:55
procedure TForm1.Button1Click(Sender: TObject) ; var AMsgDialog: TForm; ACheckBox: TCheckBox; begin AMsgDialog := CreateMessageDialog ('This is a test message.', mtWarning, [mbYes, mbNo]) ; ACheckBox := TCheckBox.Create(AMsgDialog) ; with AMsgDialog do try Caption := 'Dialog Title' ; Height := 169; with ACheckBox do...
-
یک کار گرافیکی در دلفی
دوشنبه 28 آذرماه سال 1390 20:25
procedure TForm1.FormCreate(Sender: TObject); begin { Set transparent background } Brush.Style:=bsClear; { Set pen color and width } Canvas.Pen.Color:=clBlack; Canvas.Pen.Width:=10; end; procedure TForm1.FormClick(Sender: TObject); Var X, Y : Integer; begin X:=Mouse.CursorPos.X; Y:=Mouse.CursorPos.Y;...
-
چگونه یک دیتابیس مناسب انتخاب کنیم؟ 2
پنجشنبه 24 آذرماه سال 1390 22:30
Normal 0 false false false EN-US X-NONE FA امروزه در بیشتر نرم افزارها که تولید میکنیم نیاز داریم برای مخاطب هایمان محیطی فراهم کنیم که بتوانند داده هایشان را ذخیره و بهر برداری کنند.به همین منظور مجبور به استفاده از یتابیس ها هستیم چون دیتابیس ها چنین فضایی را با انکانات مناسب برای ما فراهم می کنند.فکر کنم از هر جایی...
-
چگونه یک دیتابیس مناسب انتخاب کنیم؟
چهارشنبه 23 آذرماه سال 1390 22:24
امروزه در بیشتر نرم افزارها که تولید میکنیم نیاز به استفاده از دیتابیس است و متاسفانه در بیشتر موارد یک دیتابیس مناسب با نرم افزارانتخاب نمی کنیم و به مشکلات زیادی بر می خوریم. در اغلب موارد دیده میشود برای هر پروژه ای برنامه نویسان(اعم از دانشجویان برای پروژه های دانشجویی و برنامه نویسان که تازه شروع به برنامه نویسی...
-
السلام علیک یا ابا عبدالله الحسین(ع)
پنجشنبه 25 آذرماه سال 1389 14:30
امام حسین بیشتر از آب تشنه لبیک بود، افسوس که به جای افکارش، زخمهای تنش را نشانمان دادند،و بزرگترین دردش را بی آبی نامیدند.
-
نمادهای شیطان پرستان
سهشنبه 13 مهرماه سال 1389 17:12
آرم علائم شیطان پرستان که متاسفانه وارد کشور ما نیز شده و از هر راهی برای ترویج خود استفاده می کنند. شیطان پرستی زائده صهیونیسم هاست برای از بین بردن دین آیین و مذهب و فرهنگ ........ تمام مردم دنیا.در زیر با بعضی از علائم آنها آشنا می شوید که روی لباس ها و ..... استفاده می شود. عکس ها از سایت تبیان
-
اسکریپت قطره در وبلاگ بدون تبلیغات
یکشنبه 18 بهمنماه سال 1388 08:26
اسکریپت قطره در وبلاک بدون تبلیغات دانلود
-
fast report 4.5 full source
یکشنبه 18 بهمنماه سال 1388 08:14
فست ریپورت 4.5 به همراه سورس و قابلیت راست به چپ وتوابع فارسی مانند تاریخ، تبدیل عدد به حروف و رجیستر کامل برای گزارش گیری در دلفی(تا دلفی 2007). دانلود
-
دیکشنری جدید رایگان شبیه بابیلون
پنجشنبه 12 آذرماه سال 1388 14:53
اگر از کرک کردن و از بین رفتن کرک های بابیلون خسته شده اید. من این دیکشنری رایگاه را به شما پیشنهاد می کنم. از اینجا دانلود کنید
-
سایت آپلود عکس و .............
چهارشنبه 13 آبانماه سال 1388 11:40
www.450upload.ir