![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
||||
|
||||
|
Есть файл, DBC следующего содержания:
Код:
10.51.6.61 3306 klondaik root ******** bd Как его грамотно(с точки зрения алгоритмики, и "велосипедов") считать? Я так понимаю построчно? Код:
AssignFile(FDBC,ExtractFilePath(ParamStr(0))+'Settings\DBC.txt'); Reset(FDBC); а вот дальше ступор. "некрасивый код=\ ощущение, что есть способ проще" Readln(FDBC,str); TConnection1.hostName:=str; Readln(FDBC,str); TConnection.port:=str; ... CloseFile(FDBC); С учётом того что создаю этот файл тоже я, мб стоит его создать как-то по-другому, чтобы проще было считывать? Как вообще подобного рода settings сохраняются? |
|
#2
|
||||
|
||||
|
Ну не знаю, чем тебе твой вариант не устраивал то?
![]() Можно например записать твой файл в TStrings, при этом читав его так: Код:
var
s: TStrings;
i: Integer;
begin
S:=TStrings.Create;
...
i := 0;
While(not(EOF(FDBC))) do begin
ReadLn(FDBC, S.Strings[i]);
inc(i);
end;Ну а потом уже работать с массивом строк: Код:
TConnection1.hostName:=s.strings[0]; TConnection.port:=s.strings[1]; // и т.д. ЗЫ можно так же после записи в TStrings работать с массивом строк в цикле, изменяя при этом нужные свойства... Последний раз редактировалось v1s2222, 01.10.2010 в 23:06. |
|
#3
|
||||
|
||||
|
v1s2222, для новых *стыдно* знаний о TString очень даже позитивная информация.
Нашёл способ интереснее. Записать настройки в строку разделяя например #9 Использовать команды ситывания "до ближайшего" #9 и пихать их в настройки TConnection. Но для этого TСonnection.host TСonnection.port и т.д. надо поместить в массив типа TСoonection. Применил ваш способ с TString. Спасибо. |
|
#4
|
|||
|
|||
|
Ага, Ini-файлы для кого придумали? Или xml?
|