FIniFile: TRegIniFile; begin FIniFile := TRegIniFile.Create('Software');
FIniFile.OpenKey('VR',true);
FIniFile.OpenKey('VR-Online',true);
Width:=FIniFile.ReadInteger('Option', 'Width', 600); Height:=FIniFile.ReadInteger('Option', 'Heigth', 400); Left:=FIniFile.ReadInteger('Option', 'Left', 10); Top:=FIniFile.ReadInteger('Option', 'Top', 10);
WindowState:=TWindowState(FIniFile.ReadInteger('Option', 'WinState', 2));
FIniFile.Free; end;
На компакт диске, в директорииПримерыГлава 10Registerты можешь увидеть пример этой программы.
10.12 Потоки
од потоком я понимаю объект TStream, который является базовым объектом для потоков разных типов. В этом объекте реализованы все необходимые свойства и методы, необходимые для чтения и записи данных на различные
типы носителей (память, диск, медиа носители). Благодаря этому объекту, доступ к разным типам носителей становиться одинаковым.
В этой главе, когда я описывал работу с файлами, мы уже использовали потоки. Объект TFileStream является потомком главного объекта TStream и позволяет получить доступ к диску. Точно так же можно получить доступ:
.-к памяти через объект TMemoryStream.
.-к сети через объект TWinSocketStream.
.-к СОМ интерфейсу через TOleStream.
.-к строкам, находящимся в динамической памяти TStringStream.
Это не полный список объектов потоков, но даже все эти объекты мы рассматривать не будем. Я покажу тебе только базовый объект TStream, а ты потом посмотри на то, как мы работали с TFileStream и увидишь, что всё просто. Точно так же можно будет работать с любым другим потоком, без каких либо изменений.
Итак, давай разберёмся со свойствами и методами потока: