AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Eingaben individuell abspeichern

Ein Thema von Maxi · begonnen am 10. Sep 2013 · letzter Beitrag vom 16. Sep 2013
 
Maxi

Registriert seit: 9. Sep 2013
23 Beiträge
 
#24

AW: Eingaben individuell abspeichern

  Alt 13. Sep 2013, 15:05
Da stellt sich mir gleich die nächste Frage...

Delphi-Quellcode:
var
  Form1: TForm1;
    List1: TStringlist;
    List2: TStringlist;
    List3: TStringlist;
  Dateiname: string;
  ComboBox1:integer;
  ComboBox2:string;
  Combobox3:String;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  List1 := TStringlist.Create;
  try
    List1.Add(Edit1.Text);
    List1.Add(Edit2.Text);
    Dateiname := Format('C:\Users\Maxi\Desktop\Dateinmanager\%s.txt', [Edit1.Text+Edit2.Text]);
    List1.SaveToFile(Dateiname);
  finally
    list1.Free;

  List2 := TStringlist.Create;
  try
    List2.Add(ComboBox1.Text);
    list2.add(ComboBox2.text);
    Dateiname := Format('C:\Users\Maxi\Desktop\Dateinmanager\%s.txt', [Edit1.Text+Edit2.Text]);
    List2.SaveToFile(Dateiname);
  finally
    list2.Free;


     ComboBox3.Items.Add(Edit1.Text+edit2.Text);
end;

end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  List3 := TStringlist.Create;
  try
    List3.Add(ComboBox3.Text);
    Dateiname := Format('C:\Users\Maxi\Desktop\Dateinmanager\Oeffnen\%s.txt', [ComboBox3.Text]);
    List3.SaveToFile(Dateiname);
  finally
    list3.Free;


end;

end;
procedure TForm1.Button3Click(Sender: TObject);
begin
if OpenDialog1.Execute then Combobox3.Items.LoadFromFile('C:\Users\Maxi\Desktop\Dateinmanager');
end;

end.
Das ist jetzt mein quellcode, mit allem was ich bissher ereichen wollte...

Nun möchte ich per Buttonclick die gespeicherten Daten (bzw erst Namen) in eine Combobox verfrachten...dort möchte ich Einen Namen auswählen können und denn die Infos zu dem Namen in die entsprechenden eingabefelder drinne stehen haben....geht das und wenn ja,wie ?

ich entschuldige mich wirklich für meine hundert fragen...aber wir hatten das in der schule informatik und mich hat das so fastziniert dass ich mir delphi von meiner lehrerin gegeben haben lassen ,um zuhause an eigene projekte zu arbeiten...

für diese ,mir schon eretielte,Unterstützung sage ich schonmal danke !
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:27 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz