Недавно добавленные исходники
• Animation Loaders 1 056 • DeLiKaTeS Tetris (Тетрис) 5 990 • TDictionary Custom Sort 7 926 • Fast Watermark Sources 7 583 • 3D Designer 10 822 • Sik Screen Capture 8 164 • Patch Maker 8 350 • Айболит (remote control) 8 401 • ListBox Drag & Drop 7 261 • Доска для игры Реверси 101 524 • Графические эффекты 8 456 • Рисование по маске 7 821 • Перетаскивание изображений 6 415 • Canvas Drawing 6 800 • Рисование Луны 6 739 • Поворот изображения 5 836 • Рисование стержней 4 783 • Paint on Shape 3 479 • Генератор кроссвордов 4 500 • Головоломка Paletto 3 621 • Теорема Монжа об окружностях 4 409 • Пазл Numbrix 2 860 • Заборы и коммивояжеры 3 812 • Игра HIP 2 582 • Игра Go (Го) 2 595 • Симулятор лифта 2 975 • Программа укладки плитки 2 404 • Генератор лабиринта 3 154 • Проверка числового ввода 2 638 • HEX View 3 048

Главная

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

Компоненты

Форум

Чтение из открытого файла 2

Автор: Vit

var
  b: string[15];
begin
  with TFileStream.create('c:\MyFile.doc', fmShareDenyNone) do
  try
    read(b, 14);
    showmessage(b);
  finally
    Free;
  end;
end;

Чтение из открытого файла 2

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