delphi 08 HTML 구성 요소

5577 단어 Delphi



///HTML
/// ID
///           Line         (WebBrowser1.Document as IHTMLDocument2).execCommand('InsertHorizontalRule', True, '');
///           Button      (WebBrowser1.Document as IHTMLDocument2).execCommand('InsertButton', True, '');
///         CheckBox  (WebBrowser1.Document as IHTMLDocument2).execCommand('InsertInputCheckbox', True, '');
///         Radio        (WebBrowser1.Document as IHTMLDocument2).execCommand('InsertInputRadio', True, '');
///         Edit        (WebBrowser1.Document as IHTMLDocument2).execCommand('InsertInputText', True, '');
///         Memo        (WebBrowser1.Document as IHTMLDocument2).execCommand('InsertTextArea', True, '');
///         PswEdit      (WebBrowser1.Document as IHTMLDocument2).execCommand('InsertInputPassword', True, '');
///      GroupBox    (WebBrowser1.Document as IHTMLDocument2).execCommand('InsertIFrame', True, '');
///         ListBox      (WebBrowser1.Document as IHTMLDocument2).execCommand('InsertSelectListbox', True, '');
///         Combobox    (WebBrowser1.Document as IHTMLDocument2).execCommand('InsertSelectDropdown', True, '');
{
InsertFieldset
InsertInputFileUpload
InsertInputHidden
InsertInputImage
InsertInputSubmit
InsertMarquee






}



procedure WB_InsertHorizontalRule();
begin
   (Form1.WebBrowser1.Document as IHTMLDocument2).execCommand('InsertHorizontalRule', True, '');
end;

procedure WB_InsertButton();
begin
   (Form1.WebBrowser1.Document as IHTMLDocument2).execCommand('InsertButton', True, '');
end;


procedure WB_InsertCheckbox();
begin
   (Form1.WebBrowser1.Document as IHTMLDocument2).execCommand('InsertInputCheckbox', True, '');
end;

procedure WB_InsertRadio();
begin
   (Form1.WebBrowser1.Document as IHTMLDocument2).execCommand('InsertInputRadio', True, '');
end;

procedure WB_InsertInputText();
begin
   (Form1.WebBrowser1.Document as IHTMLDocument2).execCommand('InsertInputText', True, '');
end;

procedure WB_InsertTextArea();
begin
   (Form1.WebBrowser1.Document as IHTMLDocument2).execCommand('InsertTextArea', True, '');
end;

procedure WB_InsertInputPassword();
begin
   (Form1.WebBrowser1.Document as IHTMLDocument2).execCommand('InsertInputPassword', True, '');
end;

procedure WB_InsertIFrame();
begin
   (Form1.WebBrowser1.Document as IHTMLDocument2).execCommand('InsertIFrame', True, '');
end;

procedure WB_InsertSelectListbox();
begin
   (Form1.WebBrowser1.Document as IHTMLDocument2).execCommand('InsertSelectListbox', True, '');
end;

procedure WB_InsertSelectDropdown();
begin
   (Form1.WebBrowser1.Document as IHTMLDocument2).execCommand('InsertSelectDropdown', True, '');
end;

a

Wiz

좋은 웹페이지 즐겨찾기