![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Загрузка из файла
Вирт © (2008-07-14 15:53:00)Подскажите пожалуйста.
Я из Таблица сохраняю данные в файл
файл имеет такую структуру
Апельсины|400|2700|
Скажите пожалуйста как мне поместить их отдельно в три Едита
oldman (2008-07-14 16:31:00) [1]
> Поросенок Винни-Пух © (14.07.08 16:25) [28]
> осуществить это непросто. надо научиться программировать
для данной ситуации надо научиться кидать батоны
Dennis I. Komarov (2008-07-14 16:31:00) [2]> но как осуществить это решение вот в чём вопрос
Только сегодня 100$
Поросенок Винни-Пух (2008-07-14 16:25:00) [3]осуществить это непросто. надо научиться программировать
Виртус (2008-07-14 16:23:00) [4]oldman ©
да причём тут ДБЛабел и т.д.
на вопрос просто глянь и всё решение которому было во втором посту сразу...
но как осуществить это решение вот в чём вопрос
oldman (2008-07-14 16:20:00) [5]
> если мне когдато надо будит просмотреть что там было
TEdit??????????
TDBLabel
TDBGrid
читайте книги, юноша!!! извини, но...
Поросенок Винни-Пух (2008-07-14 16:20:00) [6]я понимаю что правильно решение делать через пос и копи... но я без понятия как это осуществить
про это пишут в книжках
Виртус (2008-07-14 16:20:00) [7]Поросенок Винни-Пух © потомучто не знаю как выгружать правильно чтобы просмотреть потом в дбГридЭх
Виртус (2008-07-14 16:19:00) [8]Поросенок Винни-Пух ©
я понимаю что правильно решение делать через пос и копи... но я без понятия как это осуществить
Поросенок Винни-Пух (2008-07-14 16:19:00) [9]А зачем выгружать в такой плохой файл, который нельзя посмотреть в DBGrideh1?
Виртус (2008-07-14 16:18:00) [10]вот структура сохраненния файла
вот как я его сохраняю
var
i:integer;
t:textfile;
begin
savedialog1.FileName:=panel1.Caption;
if savedialog1.Execute then
begin
assignfile(t,savedialog1.FileName);
rewrite(t);
try
with DBGrideh1 do
begin
Datasource.Dataset.DisableControls;
try
DataSource.DataSet.First;
while not DataSource.DataSet.Eof do
begin
for i := 1 to FieldCount-1 do write(t, Fields[i].AsString,'|');
writeln(t,panel1.caption);
DataSource.DataSet.Next;
end;
finally
Datasource.Dataset.EnableControls;
end;
end;
finally
closefile(t);
end;
end;
вот.
если мне когдато надо будит просмотреть что там было мне надо его загрузить я решил его загрузить по едитам как вышеописал вот в чём мой вопрос
Поросенок Винни-Пух (2008-07-14 16:17:00) [11]> вот! мне нужно всё это из файла загрузить в едиты тоесть
> Едит1=апельсины
> Едит2=400
> Едит3=2700
Едит1.Text:='апельсины';
Едит2.Text:='400';
Едит3.Text:='2700';
Dennis I. Komarov (2008-07-14 16:16:00) [12]> как правильно загрузить этот файл
Так Вася сказал как правильно...
Поросенок Винни-Пух (2008-07-14 16:16:00) [13]Какой файл? Мы вобще про эдиты говорили?
Dennis I. Komarov (2008-07-14 16:16:00) [14]> [16] Вирт (14.07.08 16:14)
И все эдиты тоже...
Вирт (2008-07-14 16:14:00) [15]Поросенок Винни-Пух ©
ну почему же я ж не буду здесь весь товар расписывать!
имелоссьь ввиду как правильно загрузить этот файл
Поросенок Винни-Пух (2008-07-14 16:13:00) [16]Вирт джан, а мандарины в другой файл совать?
oldman (2008-07-14 16:12:00) [17]
> вот! мне нужно всё это из файла загрузить в едиты тоесть
> Едит1=апельсины
> Едит2=400
> Едит3=2700
Читай [2]
Вирт (2008-07-14 16:12:00) [18]oldman ©
в таблице находится товар, цена...
Поросенок Винни-Пух (2008-07-14 16:12:00) [19]на микросхемах ясное дело. не на транзисторах же.
Вирт (2008-07-14 16:11:00) [20]Объясняю...
Загружаю из БД , но БД тут совсем непричем
структура файла
товар|цена|количество|
Апельсины|400|2700|
вот! мне нужно всё это из файла загрузить в едиты тоесть
Едит1=апельсины
Едит2=400
Едит3=2700
самого подходящего варианта не выббрал ну думаю и этим с эдитами обойдусь