PDA

View Full Version : سوال: فایل shimvw.dll



lolojoon
چهارشنبه 29 دی 1389, 13:56 عصر
سلام به هم دوستان گلم در سایت
چند تا سوال برام پیش اومده که کار کردم ولی به جواب کاملی نرسیدم
1 - چطور میشه مقدار خروجی تابع messegDLG رو راست چین کرد به طوری که حتی نمادی مثل mtError هم راست چین شه
2 - چطور میشه به فایل shimgvw.dll ویندوز که نرم افزار Windows Picture And Fax Viwer را برای نمایش عکس ها فراخوانی می کنه مقدار و آدرس داد که فایل عکس را باز کنه ( مثلا اگر روی فیلد مربوط نمایش عکس ها در جدول کلیک کردیم عکس مورد نظر رو مستقیم از مسیری که در بانک ذخیره شده توسط نرم افزار Windows Picture And Fax Viwer نمایش بده )
3 - چطور میشه در دلفی کامپوننت هایی که تب ایجاد میکنند رو راست چین کرد ؟
ممنون میشم که کمک کنید تا یه جواب درست و حسابی برای اینها پیدا کنم .

0armin0
جمعه 01 بهمن 1389, 00:22 صبح
در مورد اول زیاد بحث شده. باید از این تابع استفاده کنید .


function msgdlg(CONST Msg:string; DlgTypt:TmsgDlgType;
button:TMsgDlgButtons; Caption:ARRAY OF string;dlgcaption:string): integer;
var
aMsgdlg:TForm;
i:integer;
Dlgbutton:Tbutton;
Captionindex:integer;
begin
amsgdlg:= createMessageDialog(Msg,DlgTypt,button);
aMsgdlg.Caption:=dlgcaption;
aMsgdlg.BiDiMode:=bdRightToLeft;
Captionindex:=0;
for i:= 0 to amsgDlg.componentcount-1 Do
begin
if(amsgDlg.components[i] is Tbutton) then
Begin
dlgbutton:=Tbutton(amsgdlg.components[i]);
if Captionindex <= High(Caption) then
dlgbutton.caption:=caption[captionindex];
inc(captionindex);
end;
end;
Result:=amsgdlg.Showmodal;
end;
اینجارو ببینید
http://barnamenevis.org/showthread.php?7-%D9%81%D8%A7%D8%B1%D8%B3%DB%8C-%D9%86%D9%88%D8%B4%D8%AA%D9%86-%D8%AF%D8%B1-%D8%AF%D9%84%D9%81%DB%8C