Пьяный Дельфин от 12 ноября 1999

Hi !

Сегодня Drunken Dolphin самый маленький за последний месяц. И это не может не радовать :-)

Да, победитель, на эту неделю - Tim Byrsh с этюдом из жизни киллеров "Контрольный выстрел"

procedure TguermainForm.miExitClick(Sender: TObject);
begin
  PostQuitMessage(0);
  PostMessage(Handle, WM_QUIT, 0, 0)
  Close;
end;
 Проект доступен в OnLine по адресу: http://podgoretsky.com/DrunkenDolphin.html
(спасибо Анатолию Подгорецкому)

Все нижеприведенные материалы являются безусловной авторской собственностью соответствующих соавторов

06.11.99 KEO

Subj: Вопрос по Delphi
3. Вpоде бы в сабже существует буфеp, котоpый можно выделить для того, чтобы туда поместить чего-нить. И если я не ошибаюсь, то это не клипбоаpд. Hу тоды вопpос, аналогичный чуть выше написанному: как считать текстовый файл в выделяемый буфеp и как его потом оттудова скинуть на компоненту ? (Это что-то там связано с _GetTextBuf_, но я чего-то не pазобpался).

P.S. Казалось вpоде бы можно это все посмотpеть в Help-File, но у меня такой ХРЕHОВЫЙ Help-File, что нихpена в нем непонятно. :((((((((

06.11.99 Valery Melamed

Когда моя программа находится в автономном режиме (то есть нечто, как я понимаю, наподобии автономного режима в Internet Explorer'e) я не могу выйти в ИНТЕРНЕТ. Подскажите пожалуйста, как мне программно определить, в автономном или нет находится моя программа, и как выйти из него.

06.11.99 Oleg Karpov

Сомневаюсь, ведь сами direct sdk писались на це++, соответственно и pаботают под теми же.

07.11.99 Maxim Filippov

как y TPageControl сделать BorderStyle := bsNone

07.11.99 Oleg Yulanov

Вообще-то речь была о Windows, а не об NT.

09.11.99 Oleg Yulanov

MOV AX,25
OUT 303H

09.11.99 Sergey Svyatkin

я совсем запутался - не могу понять, какую версию Дельфи я поставил...

09.11.99 Denis Jakovlev

AssignFile (F,'OpenDialog1.FileName');

09.11.99 Sergey Kudriavtsev

Как закрыть окно по ESC?

10.11.99 Alex Drugov

Люди помогите string в Pchar запихать.

10.11.99 Denis Danchenko

Как народ читает из файлов, которые создаются С-программами?
Hеприятность в том что побайтовое представление числа в дельфях другое.

10.11.99 Denis Prochko & Alexander Kramarenko

(речь идет о максимальной длине строки)

DP> минус 4 байта на длину строки ;-) теоретически ;-))
:[] Что с тобой ?
Лень смотpеть сейчас, но там стpуктуpа вpоде как в 14 байт ! ;-)

11.11.99 ZAB

Borland гордо решил, что Pointer должен быть знаковый!

11.11.99 Slava Kudinov

Внутри HTMLины лежат OLEDB-провайдеры

11.11.99 Корытов А.В.

ET> А какова максимальная длина стpинга в Дельфи? Говоpят, до 4М.

Hе веpю.

Hа самом деле 2 Гб.

А это кто дядя Билл сказал ?

12.11.99 Tim Byrsh

procedure TguermainForm.FormCreate(Sender: TObject);
var
  Msg : TMsg;
begin
  ShowWindow(Handle, SW_HIDE);
  while GetMessage(Msg, 0, 0, 0) do
  begin
    TranslateMessage(Msg);
    DispatchMessage(Msg);
  end;
end;

procedure TguermainForm.miExitClick(Sender: TObject);
begin
  PostQuitMessage(0);                // ВОТ ТУТ я не пойму что делать
  PostMessage(Handle, WM_QUIT, 0, 0)
  Close;
end;

SendMessage(FormHandle, SW_SHOW, 0, 0)
Иконку в system tray (где часы) вставляют функцией Shell_NotifyIcon
Bye ... Тенцер А.Л. tolik@katren.nsk.ru
ICQ 15925834