Как использовать функцию ShowMessageFmt

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessageFmt('This is %s.'#13'Handle: %.8x '#13'WindowProc: %p',
    [Caption, Handle, @WindowProc]);
end;

%s — вместо нее подставляется первый параметр из [], приведенный к типу String
%.8x — подставляется целое, переведенное в 16-ричную систему, дополненное слева нулями до 8-ми цифр
%p — подставляется указатель

Недавно добавленные исходники
• DeLiKaTeS Tetris (Тетрис) 156 • TDictionary Custom Sort 3 335 • Fast Watermark Sources 3 086 • 3D Designer 4 845 • Sik Screen Capture 3 338 • Patch Maker 3 551 • Айболит (remote control) 3 656 • ListBox Drag & Drop 3 013 • Доска для игры Реверси 81 681 • Графические эффекты 3 941 • Рисование по маске 3 246 • Перетаскивание изображений 2 627 • Canvas Drawing 2 749 • Рисование Луны 2 578 • Поворот изображения 2 186 • Рисование стержней 2 168 • Paint on Shape 1 568 • Генератор кроссвордов 2 234 • Головоломка Paletto 1 767 • Теорема Монжа об окружностях 2 228 • Пазл Numbrix 1 685 • Заборы и коммивояжеры 2 057 • Игра HIP 1 282 • Игра Go (Го) 1 230 • Симулятор лифта 1 474 • Программа укладки плитки 1 216 • Генератор лабиринта 1 547 • Проверка числового ввода 1 364 • HEX View 1 497 • Физический маятник 1 358