PDA

View Full Version : استفاده از یه برنامه دیگه در برنامه خودم...


AbiriAmir
سه شنبه 28 مهر 1388, 15:07 عصر
سلام
چطوری میتونم از یه برنامه دیگه تو برنامم استفاده کنم؟؟؟
یعنی به صورت یه MDIChild تو برنامم قرارش بدم یا توی یه پنل لودش کنم؟؟؟
ممنون
hadisalahi2
سه شنبه 28 مهر 1388, 21:39 عصر
منظور از برنامه دیگه ، فرمها و کدهای اونه یا فایل Exe برنامه دیگه است؟
AbiriAmir
چهارشنبه 29 مهر 1388, 15:46 عصر
منظورم اینه که یه برنامه ای کارش یه چیزی هست که من در حال حاضر امکان ساختن یه برنامه که کارایی اون رو داشته باشه رو ندارم
پس میخوام از خود اون برنامه استفاده کنم ولی به طوری که جزء برنامه من باشه نه جدا...
در ضمن
اون برنامه EXE هست
vcldeveloper
چهارشنبه 29 مهر 1388, 17:36 عصر
بستگی به اون برنامه داره، و اینکه شما میخواید چه استفاده ایی ازش بکنید. راه معمول برای آن استفاده از OleContainer هست، البته به شرطی که اون برنامه همچین چیزی ارائه کنه.
AbiriAmir
پنج شنبه 30 مهر 1388, 18:34 عصر
یعنی چی همچین چیزی ارائه کنه؟؟؟
اگه نکنه چی؟
فرض کنید کار برنامه من میخواد یه نرم افزار کاربردی برای کار با عکس باشه...
حالا میخوام یه قسمتش فتوشاپ باشه
یعنی در واقع وقتی دکمه رو تو برنامه من میزنن فتوشاپ باز شه ولی Parent اون فرم من باشه نه ویندوز...
DAMAVAND
پنج شنبه 30 مهر 1388, 20:14 عصر
یعنی چی همچین چیزی ارائه کنه؟؟؟
اگه نکنه چی؟
فرض کنید کار برنامه من میخواد یه نرم افزار کاربردی برای کار با عکس باشه...
حالا میخوام یه قسمتش فتوشاپ باشه
یعنی در واقع وقتی دکمه رو تو برنامه من میزنن فتوشاپ باز شه ولی Parent اون فرم من باشه نه ویندوز...

خوب اگه نکرد بايد بهش کلک بزنيد !
اين کد رو يه نگاه بندازيد ماشين حساب ويندوز رو توي فرم برنامه باز ميکنه :


procedure TForm1.Button1Click(Sender: TObject);
var
H: THandle;
T: Cardinal;
begin
ShellExecute(Handle, 'open', 'calc', nil, nil, 0);

// New window may not be created yet, find the window in a loop until it show out
H := 0;
T := GetTickCount;
while H = 0 do begin
H := FindWindow(nil, PChar('Calculator'));
if GetTickCount - T > 5000 then
Break;
end;

if H <> 0 then
Windows.SetParent(H,Handle);
end;
mossaferin
پنج شنبه 30 مهر 1388, 20:38 عصر
کلک جالبی بود :تشویق:
اگه یه مثال هم از OleContainer باشه عالیه :لبخندساده:
AbiriAmir
یک شنبه 03 آبان 1388, 15:29 عصر
ممنون ولی مثلا اگه دکمه Scientific اون رو بزنن از فرم من خارج میشه...
در ضمن این راه در مورد همه نرم افزار ها جواب میده؟؟؟