Var f:TStringList; //Переменная типа объект TStringList.
Var f:TStringList; //Переменная типа объект TStringList. - раздел Образование, Работа с массивами динамические массивы Begin F:= Tstringlist.create(); F.free;
End...
begin f:= TStringList.Create(); f.Free;
end;
В этом примере я только создал новый объект и сразу уничтожил, не используя его.
Давай снова вспомним, что TStringList происходит от TStrings. Использовать TStrings напрямую нельзя, потому что это абстрактный объект. Абстрактный объект – объект, который представляет из себя пустой шаблон. Он может даже ничего не уметь делать, а только описывать какой-то вид или шаблон, на основе которого можно выводить полноценные объекты. Вот так TStringList добавляет в TStrings свои функции так, что он становиться полноценным объектом.
Итак, получается, что мы не можешь объявлять переменные типа TStrings и использовать этот объект, потому что это всего лишь шаблон. Это и так и не так. Переменную мы можем объявлять, но использовать сам объект не можем. Зато мы можем объявить переменную типа TStrings, но использовать эту переменную как объект TStringList, потому что он происходит от первого. Это значит, что следующий пример идентичен предыдущему:
For i:=0 to High(r)-1 do begin
r[i]:=i*i;
ListBox1.Items.Add(IntToStr(i)+' в квадрате ='+IntToStr(r[i])); end;
В области объявлений VAR я объявил две перем
For i:=0 to High(r)-1 do
r[i]:=i*i;
SetLength(r,20); for i:=10 to High(r)-1 do r[i]:=i*i;
for i:=0 to High(r) do ListBox1.Items.Add(IntToStr(i)+' в квадрате ='+In
F.Add(‘Прощай’);// Добавляю новую строку
f.SaveToFile(‘c:filename.txt’); // Сохраняю результат f.Free; end;
На всякий случай, прежде чем изменить пятую строку я проверяю, есть ли в файле эти пять строк. Ес
Преобразование целых чисел в строку и обратно
Начну я с рассмотрения специальных функций для преобразования несовместимых типов. Самое частое, что может тебе понадобиться – преобразование строк в число и обратно. Допустим, что тебе нужно напис
Преобразование даты в строку и обратно
Теперь познакомимся с преобразованием даты. Для этого есть несколько функций:
1. 1. DateToStr – преобразовывает дату в строку. Единственный параметр, который надо указать – переменн
Преобразование вещественных чисел
Теперь перейдём к числам с плавающей точкой. Когда ты строишь математику в своей программе, то можешь столкнуться с вещественными числами. Например, если у тебя есть какая-то формула, в которой исп
Преобразование строк
Допустим, что у тебя есть строка типа String и ты хочешь её преобразовать в PChar. Для такого преобразования нужно написать требуемый тебе тип и в скобках указать свою строковую перем
Var p:Pointer
Для того, чтобы получить адрес переменной или объекта, необходимо перед его именем поставить знак @. Например, у тебя есть строка Str и чтобы присвоить её а
Var p:Pointer
Для того, чтобы получить адрес переменной или объекта, необходимо перед его именем поставить знак @. Например, у тебя есть строка Str и чтобы присвоить её а
Var p:Pointer
Для того, чтобы получить адрес переменной или объекта, необходимо перед его именем поставить знак @. Например, у тебя есть строка Str и чтобы присвоить её а
Закрываем поиск
FindClose(SearchRec); end;
На компакт диске, в директорииПримерыГлава 10FindF
If WindowState=wsNormal then
begin FIniFile.WriteInteger('Option', 'Width', Width); FIniFile.WriteInteger('Option', 'Heigth', Height); FIniFile.WriteInteger('Option', 'Left', Left); FIniFile.WriteIn
Procedure TForm1.LoadProgParam; var
FIniFile: TRegIniFile; begin FIniFile := TRegIniFile.Create('Software');
FIniFile.OpenKey('VR',true);
FIniFile.OpenKey('VR-Online',true);
Хотите получать на электронную почту самые свежие новости?
Подпишитесь на Нашу рассылку
Наша политика приватности обеспечивает 100% безопасность и анонимность Ваших E-Mail
Новости и инфо для студентов