Вопрос по Delphi

[Merlіn]

Ответ: Помощь по Delphi

Получить выделенный текст из окна IE

uses
   SHDocVw_TLB; // http://www.euromind.com/iedelphi if don't have that unit 

function GetSelectedIEtext: string;
 var
   x: Integer;
   Sw: IShellWindows;
   IE: HWND;
 begin
   IE := FindWindow('IEFrame', nil);
   sw := CoShellWindows.Create;
   for x := SW.Count - 1 downto 0 do
     if (Sw.Item(x) as IWebbrowser2).hwnd = IE then begin
       Result := variant(Sw.Item(x)).Document.Selection.createRange.Text;
       break;
     end;
 end;

PS: сам не пробовал )

 

[FEOFAN]

Ответ: Помощь по Delphi

Спасибо!
На будущее попробую, а пока решил обойтись простым жабоскриптом=)

 

[quant]

Ответ: Помощь по Delphi

срочно пожалуйста напомните синтаксис команды, точнее команду такого синтаксиса

[com] variable of
   1: firstfunk;
   2: secondfunk;
   3: begin go; loose; end;
else other; end;

- выборка, я забыл ключевое слово, которое заменил [com]

 

[Hamster]

Ответ: Помощь по Delphi

case?

 

[quant]

Ответ: Помощь по Delphi

ДАААА НАКОНЕЦТО ПАСИБА

 

[Terkin2006]

Ответ: Помощь по Delphi

Создано приложение на делфи,нужно сделать с него дистрибутив.Какие предложения,что лучше использовать?

 

[Piton]

Ответ: Помощь по Delphi

Создано приложение на делфи,нужно сделать с него дистрибутив.Какие предложения,что лучше использовать?

Вместе с делфями поставляеться стандартный InstallShield, профессиональный инсталятор, вот им и пользуйся, если нету такого пиши в ЛС, дам...

 

[Piton]

Ответ: Помощь по Delphi

У когонить есть компонента TClientSocket и TServerSocket, она поставляеться на делфях версии ниже 7, а у меня седьмая, плиз поделитесь кому не жалко, очень надо. Зарание огромное спасиба!!!

 

[Hamster]

Ответ: Помощь по Delphi

Нужно на форме разместить адрес е-мейл. На его нажатии должен открываться почтовый клиент для отправки письма на етот же емейл.

Только поподробней, можно со скринами, а то я дупля не дам.

 

[KoLoB]

Ответ: Помощь по Delphi

Нужно на форме разместить адрес е-мейл. На его нажатии должен открываться почтовый клиент для отправки письма на етот же емейл.

Только поподробней, можно со скринами, а то я дупля не дам.

Хмм... что может быть проще? А вы не пробовали юзать книги или хелп в сети?

Создаем Надпись (Label). Текст в нём любой, но лучше свой мыльник
И в Onclick надписи пихаем:
shellExecute (0,'open','mailto:kolob@etsplus.net','','',SW_show);

Если я не ошибаюсь, то если прописать мыльник так: mailto:kolob@etsplus.net?subject=Thanks, то автоматически в поле "Тема" впишеться текст параметра.

З.Ы. Открываеться клиант, который являеться почтовым по умолчанию