Zapisywanie i odczytywanie danych - Edit z pliku .txt!

0

Witam ! Otóż mam problem - wszystko po kolei.

Mam 10 Form - na każdej z form jest kilka Tedit i kilka buttonów i timerów.
Mam POPUPMENU i w nim chciałbym zrobić - Save/Load ustawień programu tzn. zapis ustawień timerów/buttonów/ to co jest wpisane w Tedit do pliku txt (tzn. czy timer jest enabled,czy button jest aktywny i to co jest wpisane w Tedit) po czym program zapisze ustawienia - osoba wyłączy program to wszystkie tedity będą puste timery ustawione normalnie i buttony nieaktywne - następnie klika load i wszystko jest tak jak było przed wyłączeniem programu. Tzn. wszystko wpisane w Teditach , timery enabled/false i aktywne lub nieaktywne buttony. Potrzebne mi to ponieważ ustawianie od nowa tego wszystkiego trochę zajmuje i jest denerwujące. Nie chcę 100% przepisu jak to zrobić tylko żeby mnie ktoś naprowadził

Wiem że nie zrobię wszystkiego Od razu więc chciałbym na początek zrobić aby zapisywało mi pola Tedit noi żebym mógł odczytywać i zapisywać. Dzięki za podpowiedzi!

0

Użyj TextFile albo TStringList.

0

Zrób sobie F :TextFile, asign(F,filename), i dawaj writeln(Edit.text), na timery zrob sobie dwie linie writeln(inttostr(interval)), writeln('A') np. if active to samo na buttona. I dawaj zapis. Odczytasz przy starcie if FileExists -> czytaj i ustawiaj na if'ach.

pozdro

0

@up : Lepiej użyć klasy TINIFile, aniżeli samemu się bawić w dziwne formaty

Bardzo przejrzyście opisane, żadna filizofia:
http://4programmers.net/Delphi/Artyku%C5%82y/Pliki_INI

W razie jak by Ci sie nie chciało klikać, to prosty sampel zapisu stanu Timera:

uses
  INIFiles;

var
  INI: TINIFile;
begin
  INI := TINIFile.Create('C:\a.ini');
  Timer.Enabled := INI.ReadBool('_Sekcja_', 'Atrybut', False);  //tu masz odczyt
  INI.WriteBool('_SEKCJA_', 'Atrybut', Timer.Enabled); //tu masz zapis
  INI.Free;
end;
0

Mam 10 Form

Po co? Jedna forma wystarczy i komponent TPagecontrol.
Dane zapisuj do INI pliku.

1 użytkowników online, w tym zalogowanych: 0, gości: 1