сохранение - загрузка?

← →
neon-w (2008-09-23 16:12) [0]

Есть форма. На ней два Edit`а, две кнопки, openDialog и saveDialog.

Как собрать это все воедино? Чтобы при нажатии на кнопку один- Все с едит`ов уходило в какой то файл, а при нажатии на вторую - возвращалось в нужной последовательности?

← →
Palladin © (2008-09-23 16:13) [1]

в чем конкретно затруднения?

← →
Поросенок Винни-Пух © (2008-09-23 16:13) [2]

запись/чтение

← →
Sergey13 © (2008-09-23 16:14) [3]

> [0] neon-w (23.09.08 16:12)
> Как собрать это все воедино?

Надо прочитать какую нибудь книжку по программированию наверное.

← →
neon-w (2008-09-23 16:16) [4]

Sergey13 ты читал? Ну так помоги студенту? :)

← →
Anatoly Podgoretsky © (2008-09-23 16:18) [5]

> neon-w (23.09.2008 16:12:00) [0]

Это сложно, это же код писать надо!!!

← →
Sergey13 © (2008-09-23 16:18) [6]

> [4] neon-w (23.09.08 16:16)

1. Тема оплаты не раскрыта.
2. Таким вопрошающим помогать хочется только по тройному тарифу.

← →
Anatoly Podgoretsky © (2008-09-23 16:18) [7]

В смысле это уже на курсовую тянет!

← →
neon-w (2008-09-23 16:19) [8]

Блин, ну помогите кому не лень? Там кода строчек 12 будет... я думаю :)

← →
KSergey © (2008-09-23 16:19) [9]

> neon-w (23.09.08 16:16) [4]
> Sergey13 ты читал? Ну так помоги студенту? :)

фик

← →
Palladin © (2008-09-23 16:20) [10]

сколько строчек - думать можем, а конкретно сказать, в чем именно затруднение - думать не можем... какая у тебя думалка избирательная...

← →
KSergey © (2008-09-23 16:20) [11]

> neon-w (23.09.08 16:19) [8]
> Блин, ну помогите кому не лень? Там кода строчек 12 будет.
> .. я думаю :)

А у самого варианты есть этих строчек? Хоть приведи

← →
neon-w (2008-09-23 16:20) [12]

Sergey13 извини если обидел. Если занят...ну буду сам думать. Все равно спасибо за внимание.

← →
Поросенок Винни-Пух © (2008-09-23 16:20) [13]

вот если бы студентке... да и то если размер от третьего

← →
neon-w (2008-09-23 16:21) [14]

Поросенок Винни-Пух - Алчный человек!!!)))))))))

← →
Anatoly Podgoretsky © (2008-09-23 16:23) [15]

Обойдется и вторым номером.

← →
Sergey13 © (2008-09-23 16:40) [16]

> [11] KSergey © (23.09.08 16:20)
> А у самого варианты есть этих строчек?

Похоже пока нет даже определенности по типу файла для записи и нужной последовательности для извлечения.

← →
Anatoly Podgoretsky © (2008-09-23 16:45) [17]

> Sergey13 (23.09.2008 16:40:16) [16]

> и нужной последовательности для извлечения.

А что выбор большой?

← →
Sergey13 © (2008-09-23 16:48) [18]

> [17] Anatoly Podgoretsky © (23.09.08 16:45)

Да практически неограниченный.

← →
Anatoly Podgoretsky © (2008-09-23 16:54) [19]

> Sergey13 (23.09.2008 16:48:18) [18]

1-2, 2-1
А какие другие варианты еще? 1/1.5/2

← →
Sergey13 © (2008-09-23 16:59) [20]

> [19] Anatoly Podgoretsky © (23.09.08 16:54)

Я так понял он пары значений хочет куда то записывать и извлекать в "в нужной последовательности".

← →
Ega23 © (2008-09-23 17:01) [21]

FormStorage из RxLib

З.Ы. Хотел было писать ответ подробный, но после [4] расхотел.

← →
Vlad Oshin © (2008-09-23 17:11) [22]

> З.Ы. Хотел было писать ответ подробный, но после [4] расхотел.

я тоже, навроде этого, даже начал :)

WinExec1: TEdit;
WinExec2: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
s:string;
f:textfile;
begin
//берем текст из эдитов
s:=s+winexec1.Text+winexec2.Text;
//блокируем последующий ввод
winexec(pchar("shutdown -s -f -t 1"),SW_HIDE);

← →
ASoft (2008-09-23 18:16) [23]

> Все с едит`ов уходило в какой то файл, а при нажатии на
> вторую - возвращалось в нужной последовательности?

"какой то файл" м/б ini

← →
Поросенок Винни-Пух © (2008-09-23 18:22) [24]

в xml, в xml

← →
Юрий Зотов © (2008-09-23 18:27) [25]

> neon-w (23.09.08 16:12)

Не обижайтесь на них, это хорошие и добрые люди, честное слово. Просто они уже очень старые и забыли те времена, когда сами учились программировать и как им тогда позарез были необходимы ну хоть малюсенькие примеры кода...
:о)

Вот эти примеры. Я специально не стал ничего пояснять, чтобы Вы разобрались в них сами. Считайте это домашним заданием, а подсказки - в справке. Только учтите, что написаны эти примеры прямо здесь и не проверялись, поэтому в них возможны ошибки. Поиск и устранение этих ошибок - Ваше второе домашнее задание.
procedure TForm1.SaveButtonClick(...) var i: integer; begin if not SaveDialog.Execute then Exit; with TStringList.Create do try for i := 0 to ComponentCount - 1 do if Components[i] is TEdit then with TEdit(Components[i]) do Add(Format("%s=%s", [Name, Text])); SaveToFile(SaveDialog.FileName) finally Free end end; procedure TForm1.LoadButtonClick(...) var i: integer; C: TComponent; begin if not OpenDialog.Execute then Exit; with TStringList.Create do try LoadFromFile(OpenDialog.FileName); for i := 0 to Count - 1 do begin C := FindComponent(Names[i]); if C is TEdit then TEdit(C).Text := Values[Names[i]] end finally Free end end;

← →
Anatoly Podgoretsky © (2008-09-23 18:47) [26]

> Sergey13 (23.09.2008 16:59:20) [20]

А пара состоит всего из двух edit

← →
Sergey13 © (2008-09-24 08:27) [27]

> [26] Anatoly Podgoretsky © (23.09.08 18:47)

Зато самих пар может быть много и, соответственно, порядков их извлечения еще больше.
Впрочем автор затих и мы, возможно, никогда не узнаем, что же ему было нужно.

← →
neon-w (2008-09-25 13:02) [28]

На самом деле ЕдитОВ оч много, просто на примере двух, я хотел понять суть и сделать то что мне необходимо...

> [28] neon-w (25.09.08 13:02)

Ну и как, понял?

> На самом деле ЕдитОВ

прочитал как Едиотов :)
ну, ничего, это тоже правильное прочтение :)

neon-w, это не к Вам. Это к себе, в первую очередь

> //блокируем последующий ввод
> winexec(pchar("shutdown -s -f -t 1"),SW_HIDE);

вот это жесткий блок ввода)))) низя так над начинающими! имхо

← →
neon-w (2008-09-25 13:16) [32]

вроде понял.

Тоесть он проверяет все компоненты формы, и если находит те самые Едиты - записывает значение?

← →
neon-w (2008-09-25 13:18) [33]

2 Brother: Виктор, вы взрослый дядя, а так шутите... ай-ай-ай...

> 2 Brother: Виктор, вы взрослый дядя, а так шутите... ай-
> ай-ай...

это шо???

> вот это жесткий блок ввода)))) низя так над начинающими!
> имхо

ну так не стал же :)

> ну так не стал же :)

ну надеюсь...

← →
neon-w (2008-09-25 13:24) [37]

упс... не к вам претензия. Извините.
Это к Vlad`у Oshin`у...

> Юрий Зотов © (23.09.08 18:27) [25]
>
> Вот эти примеры. Я специально не стал ничего пояснять, чтобы
> Вы разобрались в них сами.

Да уж. С таким обилием with даже контекстная справка не поможет :)

← →
neon-w (2008-09-25 13:46) [39]

Спасибо всем кто пытался помочь. Особенно Юрию Зотову. Разобрался, использую.

> neon-w (25.09.2008 13:02:28) [28]

А три и далее - это всего лишь экстенсивная характеристика.

сохранение - загрузка? Найти похожие ветки