Как программно создать объект?

@arf_so · Регистрация: 25.01.2010

Author24 — интернет-сервис помощи студентам

Проблема в следующем: Есть текстовый файл с какими-то строчками (не суть важно с какими, важно то, что мы не знаем их числа). Надо: для каждой прочитанной строчки создать какой-нибудь объект, обладающий рядом свойств. Например как на рабочем столе для имен файлов создаются ярлыки со свойствами: картинка, имя файла и т.д.

@Coriolis · 31.01.2010, 13:14

Насколько я понял, нужно создать класс наподобе такого:

type
TTempClass = class
var1: variant;
var2: variant;
......
end;

var
ArrayOfTemp: array of TTempClass (динамический массив)

далее гдето в тексте.....

// подсчитываем количество строк в файле
Count:=0;
while not eof(f) do
begin
ReadLn(str);
Inc(Count);
end;
// задаём размерность массива
SetLength(ArrayOfTemp,Count);
// далее открываем файл ещё раз и делаем со строчками всё что угодно, не забывая предворительно создавать экземпляр класса

@arf_so 0 / 0 / 0 Регистрация: 25.01.2010 Сообщений: 239
		1
	Как программно создать объект? 25.01.2010, 12:52. Показов 1396. Ответов 1 Метки нет (Все метки) Проблема в следующем: Есть текстовый файл с какими-то строчками (не суть важно с какими, важно то, что мы не знаем их числа). Надо: для каждой прочитанной строчки создать какой-нибудь объект, обладающий рядом свойств. Например как на рабочем столе для имен файлов создаются ярлыки со свойствами: картинка, имя файла и т.д. 0

@Coriolis 0 / 0 / 0 Регистрация: 31.01.2010 Сообщений: 5
	31.01.2010, 13:14	2
	Насколько я понял, нужно создать класс наподобе такого: type TTempClass = class var1: variant; var2: variant; ...... end; var ArrayOfTemp: array of TTempClass (динамический массив) далее гдето в тексте..... // подсчитываем количество строк в файле Count:=0; while not eof(f) do begin ReadLn(str); Inc(Count); end; // задаём размерность массива SetLength(ArrayOfTemp,Count); // далее открываем файл ещё раз и делаем со строчками всё что угодно, не забывая предворительно создавать экземпляр класса 0