Как правильно сделать свою форму Parent ом для другого приложе-

← →
Wild Sam (2002-08-23 12:28) [0]

ния? Апишная функция SetParent предназначена для работы внутри одного приложения. Но для subj. тоже срабатывает, только не очень правильно (если более точно, то ввод работает не совсем корректно). А как сделать все по уму? В целом нужно сделать вот что: Excel разместить внутри моего приложения. Может, есть другие способы?
Всем спасибо.

← →
McSimm © (2002-08-23 12:53) [1]

> Может, есть другие способы?

Использовать Excel как Ole object.
TOleContainer

← →
Dm9 (2002-08-25 05:15) [2]

Киньте на Form1:

Button1,
OLEContainer1,
ScrollBox1,
OpenDialog1,
MainMenu1.

Обработчик нажатия Button1:

procedure TForm1.Button1Click(Sender: TObject);
begin
OpenDialog1.Title := "Выберите xls-файл. Или ещё какой-нибудь";
if not OpenDialog1.Execute
then Exit;
OLEContainer1.Parent := ScrollBox1;
OLEContainer1.Top := 0;
OLEContainer1.Left := 0;
OLEContainer1.Ctl3D := False; {Это чтобы был белый фон -
Color не работает. Почему ЭТО работает - не спрашивайте!!!}
OLEContainer1.SizeMode := smAutoSize;
OLEContainer1.CreateObjectFromFile (OpenDialog1.FileName, false);
ShowMessage ("Двойной клик по объекту - редактирование");
end;

А теперь - F9

← →
Wild Sam (2002-08-25 18:41) [3]

Спасибо, ребят, но я имею ввиду другие способы сделаться Parent"ом, а не редактирования *.XLS. ОлеКонтейнер не хочу использовать из-за его часто непредсказуемого (во всяком случае, для меня) поведения (типа сливания МейнМеню с исчезновением подменю "файл" с так нужной мне кнопочкой "Принт"... ее, конечно, можно сделать вне экселя, но есть еще ряд причин.)
Жду еще предложений!
Всем спасибо большое.

← →
Wild Sam (2002-08-25 18:45) [4]

Да еще 2 Dm9 - OLEContainer1.Ctl3D := False; {Это чтобы был белый фон - это пригодится, спасибо! (поведение Оле Контейнера стало чуть понятнее :) )

это единственный способ

Как правильно сделать свою форму Parent ом для другого приложе- Найти похожие ветки