تغییر Caption دکمه های MessageDialog و Showmessage

[آیدا رضایی]

سلام دوستان.
چطور میشه Caption دکمه های MessageDialog و Showmessage رو تغییر داد .

[آیدا رضایی]

یافتم - معذرت میخوام که قبلش Search نکردم .
http://delphi.about.com/od/objectpascalide/l/aa020502a.htm

[Laia2005]

دوستان نشد

میشه پروژه ای که این کار را کند اینجا آپلود کنید .!

[mzjahromi]

از طریق Resource Dll Wizard اقدام کنید. این را می توانید در File ->New->Other پیداکنید.
به این طریق نه تنها Message Box , ... بلکه کلیه پیغامها را می توانید فارسی کنید

[دنیای دلفی]

سلام
دوستان چطور می توانیم Caption کلیدهای Application.MessageBox() را تغییر داد این مهمه
اگر می دانید لطفا کمک کنید

[mzjahromi]

سلام
دوستان چطور می توانیم Caption کلیدهای Application.MessageBox() را تغییر داد این مهمه
اگر می دانید لطفا کمک کنید

از طریق Resource Dll Wizard اقدام کنید. این را می توانید در File ->New->Other پیداکنید.
به این طریق نه تنها Message Box , ... بلکه کلیه پیغامها را می توانید فارسی کنید

همون روشی که گفتم این کار رو انجام میده.

[دنیای دلفی]

من طبق مسیر پیش رفتم ولی Resource Dll Wizard را پیدا نمی کنم

[Laia2005]

من توانستم این کار را کنم با یه کد


فقط برید روش کار کنید ببینید می توانید Title پیغام را عوض کنید

[mzjahromi]

من طبق مسیر پیش رفتم ولی Resource Dll Wizard را پیدا نمی کنم
مطمئن هستید طبق مسیر پیش رفتید؟؟؟؟؟؟؟؟؟؟؟

[Laia2005]

من توانستم این کار را کنم با یه کد


فقط برید روش کار کنید ببینید می توانید Title پیغام را عوض کنید

بهتره یه نگاه بندازید

جواب همه را این آپلود میده

[دنیای دلفی]

دوست عزیز Laia2005 او آپلود شما ربطی به صحبتهای ما ندارد چون هدف ما راست به چپ کردن نیست بلکه تغییر Caption پیامهاست

[دنیای دلفی]

بله مطمئن هستم فقط در دلفی 7 در بخش Other یک گزینه به نام Dll Wizard است که برای ساختن Dll است

[mzjahromi]

بله مطمئن هستم فقط در دلفی 7 در بخش Other یک گزینه به نام Dll Wizard است که برای ساختن Dll است
مگه همچین چیزی ممکنه؟؟

[babak869]

اینم برنامه ای که شما میخواهید
موفق باشید

[دنیای دلفی]

عجیب است من در دلفی 7تم این گزینه را ندارم

[دنیای دلفی]

آقای بابک ممنون ولی من این نمونه کدها را دارم می خواهم روی خود دلفی تغییر بدهم برای
application.messagebox اگر لطف کنید راهنمایی کنید

[Laia2005]

آقا بابک ممنون

[babak869]

راستی من تمام مراحلی رو که دوستان گفتند خیلی وقت پیش انجام دادم اما برای اضافه کردن زبان جدید فقط یه پوشه بنام Far درست میشه اما من دیدم که با VB.Net یه فایل DLL میسازه اما با دلفی هر کاری کردم نشد.دوستان در این زمینه اطلاعاتی دارند؟

[mzjahromi]

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

[Laia2005]

اینم برنامه ای که شما میخواهید
موفق باشید

بیائید این کار بهتر کنید

آیا شما می توانید جای دکمه ها را هم عوض کنید ؟

به طور مثال جای دکمه تائید با انصراف عوض شود

[mzjahromi]

آیا شما می توانید جای دکمه ها را هم عوض کنید ؟

به طور مثال جای دکمه تائید با انصراف عوض شود


Application.BidiMode:=BDRightToLeft

[unique1984]

آقای ذولقدر راستش من مسیری رو که گفته بودین رفتم اما کجا می شه پیغامارو فارسی کرد من که یه خط کدم ندیدم .
کارخاصی باید انجام داد؟

[mzjahromi]

آقای ذولقدر راستش من مسیری رو که گفته بودین رفتم اما کجا می شه پیغامارو فارسی کرد من که یه خط کدم ندیدم .
کارخاصی باید انجام داد؟

بله بعد از اینکه مراحل Wizard رو طی کردید یک گروه از پروژه ها باز میشه که برای هر یک از زبانهای انتخابی شما در Wizard یک پروژه ایجاد کرده است. هر کدام از این پروژه ها یک فایل RC داره که میتونید عبارات استفاده شده در برنامه رو (پیغامهای خطا Caption ها و ...) تو اون ببینید و تغییر بدید

[unique1984]

مرسی جناب ذوالقدر پیداش کردم

[Laia2005]

Application.BidiMode:=BDRightToLeft


نشد امتحان کردم
نشد امتحان کردم
نشد امتحان کردم

[vcldeveloper]

نشد امتحان کردم
Application.MessageBox از تابع API ویندوز (MessageBox) استفاده میکنه و یک فرم دلفی نیست.

[Laia2005]

Application.MessageBox از تابع API ویندوز (MessageBox) استفاده میکنه و یک فرم دلفی نیست.

حالا چه باید کرد !

[mzjahromi]

من که بخاطر مشکلاتی از این دست و سایر مشکلات خودم MessageBox رو نوشتم
ولی MessageDialog هم تست کنید

[babak869]

در مسیر زیر یه فایل به اسم Consts.Pas وجود داره که دلفی با استفاده ازین قسمت پیغامها رو اداره می کنه.شما با تغییر و ذخیره دلخواه کلمات می تونید پیغامها رو فارسی کنید
H:\Program Files\Borland\Delphi7\Source\Vcl

[vcldeveloper]

در مسیر زیر یه فایل به اسم Consts.Pas وجود داره که دلفی با استفاده ازین قسمت پیغامها رو اداره می کنه.شما با تغییر و ذخیره دلخواه کلمات می تونید پیغامها رو فارسی کنید

این هم فقط برای فرم های دلفی کاربرد داره (MessageDlg, ShowMessage و...)، اما برای MessageBox کاربردی نداره.

حالا چه باید کرد !
خداوند که وحی نکردند از MessageBox باید حتما استفاده بشه...میشه از راههای دیگه استفاده کرد.

[Hamid_PaK]

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


function InputBoxEx(const aCaption, aLabel, aDefault:String; mainFrm:TForm; Persian:Boolean; btOK:String = 'OK'; btCancel:String = 'Cancel'):String;
var
aFrm:TForm;
aResTxt:TEdit;
begin
aFrm := TForm.Create(mainFrm);
aResTxt := TEdit.Create(aFrm);
try
with aFrm do
begin
Width := 218;
Height := 125;
Font.Name := 'Tahoma';
Position := poMainFormCenter;
BorderStyle := bsDialog;
Caption := aCaption;
if Persian then BiDiMode := bdRightToLeft;
with TLabel.Create(aFrm) do
begin
Parent := aFrm;
AutoSize := False;
Width := 190;
Caption := aLabel;
Left := 10;
Top := 10;
end;
with aResTxt do
begin
Left := 10;
Top := 30;
Width := 190;
Height := 21;
Text := aDefault;
Parent := aFrm;
end;
with TButton.Create(aFrm) do
begin
Left := 10;
Top := 60;
Width := 90;
Height := 21;
Default := True;
Caption := btOK;
ModalResult := IDOK;
Parent := aFrm;
end;
with TButton.Create(aFrm) do
begin
Left := 110;
Top := 60;
Width := 90;
Height := 21;
Caption := btCancel;
ModalResult := IDCANCEL;
Parent := aFrm;
end;
if Persian then
LoadKeyboardLayout('00000429',KLF_ACTIVATE);
if ShowModal = IDOK then
Result := aResTxt.Text;
end;
finally
aResTxt.Free;
aFrm.Free;
LoadKeyboardLayout('00000000',KLF_ACTIVATE);
end;
end;



یا حق !!!