Станционный диспетчер
Группа: Участник
Сообщений: 120
|
Пытаюсь заполнить на хтмл странице область называемую как TEXTAREA.
Эдит области на форме заполняются чудесно.
Пытаюсь заполнять TEXTAREA, так:
| CODE |
IHTMLDocument2 *pHTMLDocument = NULL;
TCppWebBrowser *newBrowser;
newBrowser = CppWebBrowser1;
if (SUCCEEDED(newBrowser->Document->QueryInterface(IID_IHTMLDocument2,(LPVOID*)&pHTMLDocument)))
{
if(pHTMLDocument!= NULL )
{
IHTMLElementCollection *pAll = NULL;
if ( SUCCEEDED ( pHTMLDocument -> get_all ( &pAll ) ) && pAll )
{
TVariant vIndex = 0;
IDispatch *pDisp1 = NULL;
TVariant vName1 = "text"; // из хтмл кода <TEXTAREA name=text ....
WideString iniString = "Это основной текст"; // то что пытаюсь поместить в TEXTAREA
if ( SUCCEEDED ( pAll -> item ( vName1, vIndex, &pDisp1 ) ) && pDisp1 )
{
IHTMLInputElement *pInput = NULL;
if ( SUCCEEDED ( pDisp1 -> QueryInterface ( IID_IHTMLInputElement, ( LPVOID* )&pInput ) ) && pInput )
{
pInput -> put_value ( iniString );
pInput -> Release ();
}
pDisp1 -> Release ();
}
}
pAll -> Release ();
}
}
|
Буду очень признателен если ктони-будь подскажет как заполнить TEXTAREA. |
Отправлено: 07.04.2005, 10:30