Недавно добавленные исходники
• DeLiKaTeS Tetris (Тетрис) 4 566 • TDictionary Custom Sort 6 587 • Fast Watermark Sources 6 357 • 3D Designer 9 307 • Sik Screen Capture 6 692 • Patch Maker 7 064 • Айболит (remote control) 7 074 • ListBox Drag & Drop 5 944 • Доска для игры Реверси 97 458 • Графические эффекты 7 276 • Рисование по маске 6 573 • Перетаскивание изображений 5 447 • Canvas Drawing 5 815 • Рисование Луны 5 520 • Поворот изображения 5 050 • Рисование стержней 3 604 • Paint on Shape 2 852 • Генератор кроссвордов 3 732 • Головоломка Paletto 3 011 • Теорема Монжа об окружностях 3 814 • Пазл Numbrix 2 511 • Заборы и коммивояжеры 3 206 • Игра HIP 2 170 • Игра Go (Го) 2 105 • Симулятор лифта 2 484 • Программа укладки плитки 2 140 • Генератор лабиринта 2 619 • Проверка числового ввода 2 296 • HEX View 2 628 • Физический маятник 2 240

Главная

Исходники (более 1 300 примеров)

Компоненты

Форум

Поменять шрифт ListBox посылкой сообщения

  LB.Items.Clear;

  for i := 0 to (SL.Count)-1 do
  begin
    LB.Items.Add(Copy(SL.Strings[i], 1, j-1));
  end;

  SendMessage(LB.handle, wm_SetFont, GetStockObject(System_Fixed_Font), 1);

Поменять шрифт ListBox посылкой сообщения

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