Недавно добавленные исходники

•  DeLiKaTeS Tetris (Тетрис)  4 583

•  TDictionary Custom Sort  6 599

•  Fast Watermark Sources  6 369

•  3D Designer  9 319

•  Sik Screen Capture  6 703

•  Patch Maker  7 084

•  Айболит (remote control)  7 088

•  ListBox Drag & Drop  5 955

•  Доска для игры Реверси  97 496

•  Графические эффекты  7 290

•  Рисование по маске  6 584

•  Перетаскивание изображений  5 457

•  Canvas Drawing  5 826

•  Рисование Луны  5 537

•  Поворот изображения  5 058

•  Рисование стержней  3 623

•  Paint on Shape  2 864

•  Генератор кроссвордов  3 750

•  Головоломка Paletto  3 019

•  Теорема Монжа об окружностях  3 828

•  Пазл Numbrix  2 519

•  Заборы и коммивояжеры  3 219

•  Игра HIP  2 186

•  Игра Go (Го)  2 117

•  Симулятор лифта  2 499

•  Программа укладки плитки  2 149

•  Генератор лабиринта  2 633

•  Проверка числового ввода  2 303

•  HEX View  2 635

•  Физический маятник  2 255

 
скрыть

Справочник по KOL - Вывод сообщений



Ведущий раздела KOL и MCK: Анатолий aka XVeL
Автор: Борис Моренко
WEB-сайт: http://kolmck.net/

procedure MsgOK( const S: String );
Самый простой способ для вывода сообщений пользователю. Заголовок приравнивается к Applet.Caption (или 'Error' если Applet не запущен)

function ShowMsg( const S: String; Flags: DWORD ): DWORD;
Упрощенный для использования MessageBox. Поэтому подробное описание Flags и возвращаемых значений можете посмотреть в Win32.hlp или в конце этого раздела (но без описания).

procedure ShowMessage( const S: String );
ShowMsg с Flags равным MB_OK or MB_SETFOREGROUND.

procedure ShowMsgModal( const S: String );
Процедура будет вам полезна, если вам надо вывести большое количество информации в модальном окне. Окно имеет фиксированную ширина 400 пикселей и текст в нем автоматически переносится на другую строку. Окно выводится посередине экрана с заголовком 'Information'.

function SysErrorMessage( ErrorCode: Integer ): string;
Создает и возвращает строку, содержащую форматированное системное сообщение об ошибке. Вы можите отобразить это сообщение на экране или записать в файл. Например, вы хотите вывести это сообщение на экран: ShowMsg( SysErrorMessage( GetLastError ) );

Список констант для API MessageBox и KOL ShowMsg
Стиль На выходе
MB_ABORTRETRYIGNORE
MB_APPLMODAL
MB_DEFAULT_DESKTOP_ONLY
MB_DEFBUTTON1
MB_DEFBUTTON2
MB_DEFBUTTON3
MB_DEFBUTTON4
MB_HELP
MB_ICONASTERISK
MB_ICONERROR
MB_ICONEXCLAMATION
MB_ICONHAND
MB_ICONINFORMATION
MB_ICONQUESTION
MB_ICONSTOP
MB_ICONWARNING
MB_OK
MB_OKCANCEL
MB_RETRYCANCEL
MB_RIGHT
MB_RTLREADING
MB_SERVICE_NOTIFICATION
MB_SETFOREGROUND
MB_SYSTEMMODAL
MB_TASKMODAL
MB_YESNO
MB_YESNOCANCEL
IDABORT
IDCANCEL
IDIGNORE
IDNO
IDOK
IDRETRY
IDYES




Похожие по теме исходники

Phone Base (телефонный справочник)

Repertoire (телефонный справочник)

Телефонный справочник

Kolch Crypt

 



Copyright © 2004-2025 "Delphi Sources" by BrokenByte Software. Delphi World FAQ

Группа ВКонтакте