Recent content by aliila1

با اين برنامه مي توانيد از كدهاي مالتي موديا بيلدر حفاظت كنيد از خصوصيت خوب ديگه اينكه بدون نياز به هيچ نر م افزاري مي توانيد پلاگين داشته باشيد البته از كدهاي خود بيلدر يك فايل با فرمت dll كه داخل بيلدر از آن استفاده كنيد ساخت خودمه ورايگانه مي توانيد استفاده كنيد اينم يك آموزش كوچيك از ورژن...

نرم افزار كوچكی كه چند فایل را به یك فایل ادغام شده تبدیل می كند وبعد دباره به حالت اول بر می گرداند نام Merge_Split_Small ساخت خودمه انشالله خوشتون بیاد در مرحله بعد پیشرفتش می دهم http://s3.picofile.com/file/8219342642/Merge_Split_Small.rar.html دانلود رایگان

با سلام با اين دو نوع كد مي توانيد فرم را به صورت تكست يا باينري ذخيره ودوباره لود كنيد اينم فايل همراه سورس آن http://s3.picofile.com/file/8212756418/save_form_to_txt.rar.html دانلود

با سلام كد نویسی دلفی delphi با این كدی كه گذاشتم میتونید اطلاعات خود را به داخل فایل dll یا exe بفرستید ودوباره برگردانید یك كد منحصر به فرد كه آنهایی كه كد نویسی میكنند می دانند خیلی به كار می آید واین كد ها همگی یكجا گیر كسی نمی آید خصوصیات: 1) ارسال ودریافت نوشته به داخل ریسورس...

سلام دوستان با این نرم افزارمی توانید فایل فلش swf را به فایل اجرایی یعنی exe تبدیل كنید حجم كم و می توانید منو ی فلش پلیر را حذف كنید خود فلش پلیر را نیز به انتخاب خودتون می توانید تغییر بدید زیرا حجم فایل ها به حجم فلش پلیر بستگی داره در این بسته فلش پلیر 10 استفاده شده كار باهاش بسیار ساده...

سلام از اين براي لود خط به خط يك فايل تكست ميتواني استفاده كني procedure StrToFile(Texte: String; File_Name: String); var Lines: TStrings; begin Lines := TStringList.Create; try Lines.Add(Texte); Lines.SaveToFile(File_Name); // ShowMessage('jhfgfghf'); finally...

يكسري مثال كاربردي براي دلفي كه مورد نيازتون ميشه PROCEDURE TForm1.BitBtn4Click(Sender: TObject); BEGIN Edit1.Text := TimeToStr(Time); END; PROCEDURE TForm1.BitBtn5Click(Sender: TObject); BEGIN Edit1.Text := DateToStr(Date); END; PROCEDURE TForm1.BitBtn6Click(Sender: TObject); BEGIN...

با اين كدها كارهاي ابتدايي ويندوز مثل ساخت فايل كپي فايل - حذف فايل وفولدر تغيير نام فايل وفولدر مسير سيستم و ويندوز و تمپ تمامش در مثال است و قابل دانلود است procedure TForm1.Button1Click(Sender: TObject); begin //StrToFile('ali reza habibi' ,'c:\test.txt')...

سلام راهي كه وجود داره اينه كه كد ها را داخل فايلي سيو وبه بت تبديل كني و وبعد اجراش كني procedure TForm1.Button7Click(Sender: TObject); var dd: string; begin //با كمك اين تابع كدهات را سيو تو ي يك تكست مي كني وفرمت آنرا به بت //تبديل كرده و در سي سيو مي كني و در پايان اجرا...

Function adad_car(s : String; Car: PChar): Integer; var s2 : String; b,i,n:Integer; begin n:=0; for i := 1 to Length(s) do begin s2:=s; b:=Pos(Car, s); Delete(s, 1, b); if s<>s2 then begin n:=n+1; end; end...

اگر منضورت تعداد متغيير رشته اي اينطوريه ////////////////////////////////////////////////////////////// ولي اگر اشتباه نفهميده باشم تعداد كاراكتر را مي خواهي بدست بياري تا بعد براي جدا سازي به مشكل بر نخوريازاين تابع مي تواني استفاده كني Function adad_car(s : String; Car: PChar): Integer...

موضوع جديد در رابطه با اجراي كد تو دلفي وبيلدر سلام يك موضوع جديد براي كسايي كه از بيلدر استفاده ميكنند آنهم اينكه: شما مي توانيد در دلفي كد هاي بيلدر را بنويسيد وآنرا از داخل دلفي (پلاگين) اجرا كنيد اين نمونه مثال هم كد دلفي وهم بيلدر در يك فايل هستش دانلود

سلام بازم ممنون از تشكر شما (زكات علم آموختن آنست) اگر چه من چيزي بلد نيستم در كنار بعضي ها يك نمونه فايل اجرايي برات گذاشتم واز همين كدها استفاده كردم تا متوجه بشي اگر زبان داس بلدي هر چيزي بخواهي مي تواني جايگيزين كدت بكني ShellExecute(0,nil, PChar('cmd'),PChar('/c "اينجا محل نوشتن كد...

اجرای دستورات داس..توی دلفی چجوری هست..هم بصورت آشکار هم مخفی فقط اجرا هست WinExec('cmd -c dir', SW_SHOW); اگه بخواهيد مي توانيد از روش زير استفاده كنيدuses ..., ShellApi; // Simple one-liner (ignoring error returns) : if ShellExecute(0,nil, PChar('"C:\my...

آدرس سیستم 32 پوشه ای بسازه تووو درایوی که ویندوز نصبه فایلی رو پاک کنه و امثال اینااا هدفم آشنایی با آدرس های ویندوز و نحوه استفاده از آدرس هاست خود دلفی واسه ویرایش فایلها (حذف. ایجاد . تغییر نام و...) دانلود