Telefonbuch-Programm (Datensätze?)

[dopeline]

Danke, aber das progie kenn ich schon (ist mir aber zu 'hoch')

[DelphiDeveloper]

Zitat von dopeline:

Code:

if OpenDialog1.Execute then          { Dialog zum Dateiöffnen anzeigen }

Da sagt er mir, OpenDialog1 sei ein unbekannter bezeichner. muss uch das nicht irgentwo vereinbaren?

Opendialog ist ein Dialog zum öffnen von Dateien
siehe Komporegister Dialoge

[dopeline]

ah ja, jetzt öffnet sich dieses standard-fenster zu öffnen einer datei.
schon mal ein anfang.

[Daniel B]

Hallo,

Zitat von dopeline:

ah ja, jetzt öffnet sich dieses standard-fenster zu öffnen einer datei.
schon mal ein anfang.

Und mit OpenDialog1.FileName bekommst Du sozusagen die Datei die im Dialog ausgewählt wurde. Das gleich gibts auch noch mit dem SaveDialog1.FileName.

Grüsse, Daniel

[dopeline]

trotzdem fehlen da doch noch ein paar grundlegene dinge. z.b. dass, wenn ich einen neuen eintrag einrichte, dieser dann in der tabelle erscheint usw. wie mach ich das?

[Daniel B]

Hallo,

Zitat von dopeline:

trotzdem fejlen da doch noch ein paar grundlegene dinge. z.b. dass, wenn ich einen neuen eintrag einrichte, dieser dann in der tabelle erscheint usw. wie mach ich das?

Wenn es nicht umbedingt ein StringGrid sein muss, dann würde ich eher eine ListView nehmen, ist viel leichter zum Handhaben. Ausserdem gibt es hier schon jede Menge Beispiele wie man Einträge einfügt, löscht, in Dateien schriebt und lädt und wie man eine ListView z.B. druckt.
Muss das wirklich ein Grid sein?

Grüsse, Daniel

[Basic-Master]

hi, geht jetzt vielleicht nicht direkt ans thema, aber wenn du schon Delphi icons nimmst, dann würde ich dir empfehlen, Delphi-Menüs und Delphi-ToolBars dazuzunehmen... (Sieht besser aus)

[dopeline]

Erst mal vielen dank für eure beiträge!

@Daniel B: muss nicht unbedingt ein stringgrid sein. bin gegenüber vorschlägen völlig offen.

@Basic-Master: Das mit den Icons war auch erst eine vorab-lösung. entweder werde ich mir selber welche kreieren, oder ich such mir noch ein paar schöne. aber du hast schon recht, ist nicht wirklich ein hingucker.

Gruß, dopeline

[dopeline]

DungeeBug hat mir folgenden Code gegeben (DANKE!) aber da ist noch irgentwo ein haken.

Delphi-Quellcode:

procedure TFormHaupt.Speichern1Click(Sender: TObject); 
var 
MyStream : TFileStream; 
i : integer; 
MyDaten : TDatei;
 
begin 
MyStream.Create('C:\text.txt',fmCreate); 
FOR i := 1 TO 30 DO 
BEGIN 
// Daten einlesen 
MyDaten.Name := StringGrid1.Cells[0,i]; 
MyDaten.Nummer := StrToInt(StringGrid1.Cells[1,i]); 
MyDaten.Mobil := StrToInt(StringGrid1.Cells[2,i]); 
MyDaten.Adresse := StringGrid1.Cells[3,i]; 
MyDaten.Mail := StringGrid1.Cells[4,i]; 
// Daten schreiben 
MyStream.Write(MyDaten.Name[1],SizeOf(MyDaten.Name)); 
MyStream.Write(MyDaten.Nummer[1],SizeOf(MyDaten.Nummer)); 
MyStream.Write(MyDaten.Mobil[1],SizeOf(MyDaten.Mobil)); 
MyStream.Write(MyDaten.Adresse[1],SizeOf(MyDaten.Adresse)); 
MyStream.Write(MyDaten.Mail[1],SizeOf(MyDaten.Mail)); 
END; 
MyStream.Free; 
end;

delphi meckert, dass es irgend einen arrey-typ braucht (oder so ähnlich).

dopeline

[dopeline]

Und die Sache mit dem ListView will auch nicht so ruchtig. Ich weiß nicht, wie ich ihm sage, dass er die eingaben aus den edit-feldern in die richtigen spalten des listviews schreibt un das als einen datensatz nimmt.