Можно ли встроить в форму ехе-файл?

← →
Konst5719 © (2006-11-10 10:57) [0]

Здравствуйте!
Помогите пожалуйста, если это возможно, решить проблему!
Я хочу в форму встроить уже существующий ехе-файл. Другими словами, хочу сделать чтото напоминающее конструкцию MS Word. Т.е. чтобы в моей форме я смог используя, например компонент OpenDialog, открыть уже существующую тестовую программу, или одновременно даже несколько.

← →
Percent (2006-11-10 11:00) [1]

Что значит "встроить"?

ShellExecute()?

← →
Darvin © (2006-11-10 11:00) [2]

Ты сам понял, что ты хочешь? Я полагаю, что тебя устроит запуск другого приложения из своего с выбором этого приложения. Или это не так?

← →
Ketmar © (2006-11-10 11:01) [3]

телепатор подсказывает, что автору нужен scripting engine. %-)

← →
Jeer © (2006-11-10 11:04) [4]

> Konst5719 © (10.11.06 10:57)

> в форму встроить уже существующий ехе-файл

Переводишь из bin в hex и заполняешь форму до посинения.

← →
Плохиш © (2006-11-10 11:13) [5]

Это автор просто так MDI-интерфейс обозвал.

← →
Darvin © (2006-11-10 11:36) [6]

>Плохиш © (10.11.06 11:13) [5]
Может быть... Но он явно указал на exe ;-)

← →
Desdechado © (2006-11-10 11:40) [7]

это уже не телепатия, это гадание на бинарнике

← →
Romkin © (2006-11-10 11:49) [8]

А мне кажется, автору нужна программа, которая может работать в OleContainer...

← →
Рамиль © (2006-11-10 12:17) [9]

Варианты озвучены, делаем ставки :o)

← →
Percent (2006-11-10 12:38) [10]

Варианты озвучены

Про плагины забыли!!!

← →
evvcom © (2006-11-10 12:52) [11]

> [9] Рамиль © (10.11.06 12:17)
> делаем ставки :o)

Ставлю на соломенного бычка!

← →
Плохиш © (2006-11-10 13:02) [12]

Ставлю на биореактор :-)

← →
Anatoly Podgoretsky © (2006-11-10 13:15) [13]

> Konst5719 (10.11.2006 10:57:00) [0]

MS Word никаких ехе-файлов в себя не встраивает.

← →
Anatoly Podgoretsky © (2006-11-10 13:16) [14]

> Ketmar (10.11.2006 11:01:03) [3]

телепатор подсказывает, что автор сам не знает чего хочет.

← →
Anatoly Podgoretsky © (2006-11-10 13:16) [15]

> Плохиш (10.11.2006 11:13:05) [5]

Как догадался?
Я не смог :-(

← →
Anatoly Podgoretsky © (2006-11-10 13:17) [16]

> Romkin (10.11.2006 11:49:08) [8]

А встраивание ехешника при чем?

← →
Anatoly Podgoretsky © (2006-11-10 13:17) [17]

> Percent (10.11.2006 12:38:10) [10]

Думаю это не все, но мозг морщить не хочется, не стоит оно того.

← →
Anatoly Podgoretsky © (2006-11-10 13:18) [18]

> evvcom (10.11.2006 12:52:11) [11]

Я же говорил, что не все. Во.

← →
Плохиш © (2006-11-10 13:31) [19]

> Anatoly Podgoretsky © (10.11.06 13:16) [15]

:-P

← →
Greenchel © (2006-11-10 13:32) [20]

This is MDI ))

← →
Плохиш © (2006-11-10 13:33) [21]

> Greenchel © (10.11.06 13:32) [20]
> This is MDI ))

Боян :-P

← →
Anatoly Podgoretsky © (2006-11-10 14:21) [22]

> Плохиш (10.11.2006 13:33:21) [21]

Осень!

← →
Darvin © (2006-11-10 14:56) [23]

Орех

← →
Kolan © (2006-11-10 14:58) [24]

ИМХО это он про OLE...

← →
Konst5719 © (2006-11-10 16:29) [25]

1. Не ожидал такой мгновенной реакции... на других форумах месяцами ждешь ответа, за что конечно спасибо!
2. Если я правильно понял, то я послал вопрос в "помощь начинающим..." а нарвался на диалог акул Delpi. Круто вы меня!
3. Да с горяча я не точно высказался, я думал тут это прощают начинающим...
4.Уточняю, надеюсь на меня вы не много поставили...

Я хотел, чтобы при нажатии этой кнопки
procedure TForm2.Button2Click(Sender: TObject);
begin
button2.Enabled:=false;

form2.Color:=CLwhite;
ShellExecute(Application.Handle,"open","qwe.exe","",Pchar(ExtractFilePath(Applic ation.ExeName)),SW_minimize);

end;
не просто открывалось окно , а и размещалось в строго заданом месте на моей форме, да и ешё нелзя было переместить его с формы никуда, закрыть до того пока форма не будет закрыта, но все действия в самой тестовой программе qwe.exe можно было произвести, т.е. протестироваться.
Надеюсь теперь понятнее..., даже еслине так, то я уже сам нашел все решения!
А так грубо отшиваете людей, которые может всего пару месяцев занимаются в Delphi вы все-таки зря, особый привет разработчику сайта про био...чето-там - ему уже ничего не поможет...

← →
имя (2006-11-10 16:35) [26]

Удалено модератором

← →
Eraser © (2006-11-10 16:40) [27]

> Можно ли встроить в форму ехе-файл?

а форму встроить в DLL :)

← →
Desdechado © (2006-11-10 16:42) [28]

> А так грубо отшиваете людей
Для общего развития и во избежание
http://www.ln.ua/~openxs/articles/smart-questions-ru.html

> Konst5719 (10.11.2006 16:29:25) [25]

> 1. Не ожидал такой мгновенной реакции... на других форумах месяцами ждешь ответа, за что конечно спасибо!

Ты в правильное место попал :-)

> 2. Круто вы меня!

А ты чего другого ожидал, или ждешь месяцами или что то в придачу, тем более с таким вопросом.

> 3. я думал тут это прощают начинающим...

Прощают, тут не богадельня, относятся снисходительно, но извини твой вопрос другого не позволяет

> 4.Уточняю, надеюсь на меня вы не много поставили...

Вот этого от тебя и ждали

Ой пункт 5 забыл

А так грубо отшиваете людей, которые может всего пару месяцев занимаются в Delphi вы все-таки зря, особый привет разработчику сайта про био...чето-там - ему уже ничего не поможет...

Вот это ты зря, наезжать не стоит, подойди лучше к зеркалу.

Вот же набросились на начинающего...
Общих решений для произвольной программы, по-видимому, нет. Если встраиваемый код самописный - можно переделать его, скажем, под технологию OLE (это, например, когда в ворде при редактировании рисунка появляется Paint).
Если не нужно, чтобы программа работала самостоятельно - оформить код, как MDI-форму.
В общем, пути решения уже перечислены в этой ветке, надо только абстрагироваться от разбавляющего их глума :)

если дело только за тем, чтобы потестировать пресловутый qwe.exe, можно просто запустить его в вирт.машине (из-под VMWare, скажем)

VMWare, VMWare.. глупости всё это..

procedure TForm1.FormShow(Sender: TObject); var calc:hwnd; begin Color:=clBackground; calc:=FindWindow("SciCalc",nil); if calc=0 then ShellExecute(handle,"","calc.exe","","",SW_SHOW); while calc=0 do begin calc:=FindWindow("SciCalc",nil); Application.ProcessMessages; sleep(100); end; windows.SetParent(calc,handle); end; procedure TForm1.FormDestroy(Sender: TObject); var calc:hwnd; begin calc:=FindWindowEx(handle,0,"SciCalc",nil); if calc<>0 then SendMessage(calc,WM_CLOSE,0,0); end;

> Другими словами, хочу сделать чтото напоминающее конструкцию
> MS Word. Т.е. чтобы в моей форме я смог используя, например
> компонент OpenDialog, открыть уже существующую тестовую
> программу,

То-ли воздух нынче пьян, то-ли леший нынче рьян...

А что такое "конструкция MS Word"?
И как она, используя OpenDialog открывает тестовую программу?

> easy

Не отвечает всем требованиям :) закрыть можно, двигать тоже

> RWolf © (10.11.06 16:57) [31]
> это, например, когда в ворде при редактировании рисунка появляется Paint).

Странно, а у меня не повляется :(
Это, наверное, потому, что Пайнта не установлено...

> [25] Konst5719 © (10.11.06 16:29)
> не просто открывалось окно , а и размещалось в строго заданом
> месте на моей форме, да и ешё нелзя было переместить его
> с формы никуда, закрыть до того пока форма не будет закрыта,
> но все действия в самой тестовой программе qwe.exe можно
> было произвести, т.е. протестироваться.

См. [8]

> Romkin © (10.11.06 11:49) [8]
> А мне кажется, автору нужна программа, которая может работать
> в OleContainer...

Автор псих?
Или все таки "с OleContainer"?

oldman © (10.11.06 18:19) [39]

Насчет контейнера - чистая правда.

Утром подъедут мусорщики, выгребут, отвезут, сожгут и зароют - будет работа археологам через пару-тройку сотен лет.

Можно ли встроить в форму ехе-файл? Найти похожие ветки