Delphi - Незнаю как сделать в Delphi?

[Prisoner]

UZER

Не знаю как на счет ругаться (начнем с того, что это не есть культурно ), но сделав окно модальным можно избежать потерю фокуса окном, его можно будет только закрыть.



Второе -

тут

[Prisoner]

Тогда поможет такой код, помещенный в любой целесообразный обработчик события:





Код:

Код: Выделить всё

var
  sEMailAddress, sSubject, sBody, sMailMessage: string;
begin
  sEMailAddress := 'somebody@mail.ru';
  sSubject      := 'Subject of message';
  sBody         := 'Here some strings of message which will be send.';
  sMailMessage  := 'mailto:' + sEMailAddress +
                '?subject=' + sSubject +
                '&body=' + sBody;
  ShellExecute(0, 'open', PChar(sMailMessage), '', '', SW_SHOWNORMAL));
  //по поводу ловли ошибок см. справку по функции ShellExecute
end;

[UZER]

Prisoner

Все работает, пасиб

Ты там в одной скобке ошибся - последняя скобка лишняя

[UZER]

Как сделать чтобы при нажатии кнопки открывался www-сайт в ослике IE ?

[Tr00per]

Tr00per



Код:

Код: Выделить всё

procedure TForm1.Button1Click(Sender: TObject);
begin
winexec('explorer http://www.moysait.ya',0)
end;

Надеюсь, понятно

[Tr00per]

Спасибо за ответ! И еще: какие есть для дельфи компоненты, ограничивающие пользование программой до 30 дней, если прога не зарегистрирована?

[Tr00per]

Tr00per

Даж не знаю про компоненты, у меня другая идея - во врумя установки или первого запуска программы создать где-нибудь в глубине реестра запись, где записать дату установки, а потом при каждом запуске сравнивать, если больше 30 дней ==>...