Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

HTML Редактор от Microsoft

Страницы: < 1 2 3 >
Алексей Петухов © (2005-07-23 21:01:00)
Здравствуйте, уважаеме мастера.
Вот пытаюсь работать с ActiveXсомпонентом TDHTMLEdit.

на второй форме DHTMLEdit1:TDHTMLEdit

На первой форме кликаем кнопочку
procedure TForm1.Button1Click(Sender: TObject); begin Form2:=TForm2.Create(nil); Form2.ShowModal; Form2.Free; end;
И если на второй форме срабатывает какое либо обращение к DHTMLEdit1.DOM, то получаем 'Access Violation'при Form2.Free;

Помогите, чем можете :-)
А то я скоро кипятком писать начну :-)

Джо (2005-07-26 19:18:00) [21]

> [25] pasha_golub © (26.07.05 19:16)

Так отож. Хто его знает. В отладчике пока гоняю, там черт ногу сломит, когда он должен создаваться. DefaultInterface вроде создан - а дальше - темный лес. Никак не вникну :(

pasha_golub (2005-07-26 19:16:00) [22]
А может этот самый DOM (Document Object Model) создавать и заполянть надобно?

Джо (2005-07-26 19:12:00) [23]
Черт его знает, у меня уже любое обращение к DHTMLEdit1.DOMвызывает 'Catastrophic failure' внезависимости от места вызова.

pasha_golub (2005-07-26 19:11:00) [24]
А ежели так?

Application.CreateForm();

Алексей Петухов (2005-07-26 18:56:00) [25]
Вот еще обращение (к вопросу [8][9]):
OleVariant(heEditor.DOM.selection.createRange).pasteHTML('<a href='''+s+'''>Перейти на '+s+'</a>');

Алексей Петухов (2005-07-26 18:53:00) [26]

> Джо © (26.07.05 18:50) [19]

Не расстраивайтесь. Я не хотел Вас обидеть.

Джо (2005-07-26 18:51:00) [27]

> [18] Алексей Петухов (26.07.05 18:49)

Сорри, у меня что-то клиент глюкнул, не показал [11]. Сейчас гляну.

Джо (2005-07-26 18:50:00) [28]

> [17] Алексей Петухов (26.07.05 18:48)
> 2) Весь код, необходимый для осмысления проблемы, приведен
> в [1]

Если так уверен, осмысливай... Причем здесь тогда форум? Здесь же не гадалки собираются, а программисты.

Алексей Петухов (2005-07-26 18:49:00) [29]
To
> Джо © (26.07.05 18:45) [16]

смотри пункт [11]

Алексей Петухов (2005-07-26 18:48:00) [30]
1) Я хочу чтобы форма закрылаь без Exeption-ов.
2) Весь код, необходимый для осмысления проблемы, приведен в [1]
3) Вообще задача - элементарный редактор HTML с минимальным набором опций.

Джо (2005-07-26 18:45:00) [31]

> [14] Алексей Петухов (26.07.05 18:42)
> Не понял Вас Джо.

Вы пишете
> И если на второй форме срабатывает какое либо обращение
> к DHTMLEdit1.DOM
Я ответил, в [8] посте:
> Приведи код этого обращения.
Что непонятного?

Term (2005-07-26 18:43:00) [32]

> Не помогает

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

> procedure TForm1.Button1Click(Sender: TObject);
> begin
> Form2:=TForm2.Create(nil);
> Form2.ShowModal;
> Form2.Free;
> end;

как я понял ты хочеш чтобы форма уничтожилась после закрытия
так для этого можно использовать Action:=caFree в событии OnClose, или я чтото не понял. Скажи какой рез-т хочеш получить

Алексей Петухов (2005-07-26 18:42:00) [33]
Не понял Вас Джо.

Джо (2005-07-26 18:37:00) [34]

> [12] Алексей Петухов (26.07.05 18:33)
> Не помогает

[8] Джо © (26.07.05 17:57)

Алексей Петухов (2005-07-26 18:33:00) [35]

> Form2.Release; ?

Не помогает

Алексей Петухов (2005-07-26 18:30:00) [36]
Ну например:

DHTMLEdit1.DOM.charset:='windows-1251';
или (в событии onmouseup)
html:=DHTMLEdit1.DOM.parentWindow.event.srcElement.outerHTML;

П.С. Да не темню я. Просто не хотел заморачивать Вас "лишней" информацией.
П.С.№2. Может - ну его - этот TDHTMLEdit? Посоветуйте пожалйста другую компоненту с такой-же функциональностью.

Плохиш (2005-07-26 18:27:00) [37]
Form2.Release; ?

Term (2005-07-26 18:05:00) [38]
хотя да чтото он темнит приведи как код, а то чтото невразумительное складывается

Джо (2005-07-26 17:57:00) [39]

> И если на второй форме срабатывает какое либо обращение
> к DHTMLEdit1.DOM

Приведи код этого обращения.

Term (2005-07-26 17:46:00) [40]

> Form2.Free;

почитай про то что происходит с объектом в этом случае

Страницы: < 1 2 3 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »