Загрузка параметров в Edit и их выбор через ComboBox

[Dima DDM]

Вознкик следующий казус есть файл с параметрами параметров много каждый написан в своей строчке а после стоит куча значений. Значения разделены одним или несколькими пробелами. вот пример :

Дом 12 23 45 кирпичный
Дом3 23 56 01 Стеклянный
Дом4 77 23 22 Соломенный

надо чтоб при выборе соответствующего названия дома в поле ComboBox
все его параметры загружались каждый в отдельный edit
Помогите это реализовать!!!

[mss]

TStringList тебе в помощь)

[Dima DDM]

Покажите хоть пример как можно загрузить через TStringList в Edit'ы
...Пожалуйста

[Stilet]

Как шаблон:
Создание:

var s:TStringList;i:integer;
...
s:=TStringList.Create;
...
s.LodaFromFile('File');

Загрузка в Комбик:

for i:=0 to s.Count-1 do  ComboBox.Items.Add(copy(s[i],1,pos(' ',s[i])))

Получение данных

var e:TStringList;
...
e:=TStringList.Create;
e.DelimitedText:=s[Combobox.ItemIndex];
 Edit1.Text:=e[0];
 Edit2.Text:=e[1];
 Edit3.Text:=e[2];
 ...
e.free;
...

Читай в хелпе подробности о представленных тут свойствах

[Dima DDM]

Вы не совсем поняли у меня на форме ~26 edit'ов (так как в каждой строке 26 параметров).
Всего в файле 40 строк.
Мне надо чтоб в каждый edit загружался свой параметр
Не могли бы вы привести пример такой загрузки в edit'ы скажем 20 строки

[ArtGrek]

http://programmersforum.ru/showthrea...=135723&page=2
POST #17
ето должно помочь разобраца как делать

[Stilet]

Вы не совсем поняли

Ошибаешся, я тебя совсем понял. Единственное что если ты не хочешь писать все 26 эдитов ручками можно в цикле их обойти

k:=0;
with Panel do
for i:=ControlCount-1 do 
 if Controls[i] is TEdit then begin
  TEdit(Controls[i]).Text:=e[k]
  inc(k);
 end;

Примерно так в общем. Будет лучше сгруппировать Эдиты в Панель и уже (как в примере) брать только ее Эдиты не трогая другие на форме.

[asmodey1]

Дом20 77 23 22 Соломенный
Есть такая функция POS и ее "сестрица" POSEX.
Р1:=POS(' ','Дом20 77 23 22 Соломенный') даст позицию Р1 первого пробела -> первый параметр (Дом20) - это кусок исходной строки с 1-й по Р1-1.
Выцепляем этот кусок при помощи функции COPY.
POSEX - то же самое, но ищет, начиная с заданной позиции.
Короче, жмем волшебную пимпу F1 и изучаем формат этих функций...

[Dima DDM]

Никогда я еще так не запаривался над такой мелочью
Не могли бы вы написать сюда пример кода загрузки...
А то на словах вроде все понятно но у меня почему-то не выходит

[asmodey1]

Сообщение от Dima DDM

на словах вроде все понятно но у меня почему-то не выходит

Что именно не получается ?
Мы вообще не видели от вас ни одной строчки кода.
Впечатление такое, что хотите "на шару" получить готовый код и все.
Мол, я ничего не понимаю, напишите мне код и все тут.
А не напишете - значит у вас форум никудышный...