Уважаемый
lmikle
Вы писали:
Ну так и записывать. Формировать строку для записи с добавлением нужного кол-ва пробелов. Например, с помощью такой функции:
Код:
function SetStrLength(AData : String; ALength : Integer) : String;
begin
Result := AData;
If Length(Result) > ALength
Then Result := Copy(Result,1,ALength)
Else
While Length(Result) < ALength Do Result := Result + ' ';
end;
Admin: Не забываем про оформление!
Если честно я не очнь понял =) я в делфи всего навсего пару неделек
вот то что у меня есть
из бд Оракл вытащил данные, дальше пытался (так по простому ) вывести их в тхт файлик ...
writeln(f, OracleDataSet1['Pole1'],OracleDataSet1['Pole2'],OracleDataSet1['Pole3']);
и вот получилось типо такого
вот, но вышло все встрочку принципи и тут можно чтобы после кажлого 'Pole' было необходимое кол-во пробелов но это совсем не то что мне нужно
необходимо, что-то типо бд текстовой ... поле 1 занимает под данные 1-10 символы поле 2 с 11-23 символ и т.д =)
а на счет вашего примечига .. можете по подробнее его так сказать расшифровать
заранее спасибо!