Недавно добавленные исходники
• TDictionary Custom Sort 514 • Fast Watermark Sources 878 • 3D Designer 1 809 • Sik Screen Capture 1 458 • Patch Maker 1 465 • Айболит (remote control) 1 390 • ListBox Drag & Drop 1 163 • Доска для игры Реверси 21 337 • Графические эффекты 1 339 • Рисование по маске 1 278 • Перетаскивание изображений 1 091 • Canvas Drawing 965 • Рисование Луны 803 • Поворот изображения 758 • Рисование стержней 804 • Paint on Shape 489 • Генератор кроссвордов 750 • Головоломка Paletto 661 • Теорема Монжа об окружностях 842 • Пазл Numbrix 609 • Заборы и коммивояжеры 835 • Игра HIP 551 • Игра Go (Го) 523 • Симулятор лифта 544 • Программа укладки плитки 505 • Генератор лабиринта 561 • Проверка числового ввода 521 • HEX View 596 • Физический маятник 522 • Задача коммивояжера 556

Главная страница

Исходники (более 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

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