Hallo Leute
Ich würde gerne variable Records speichern und hab das jetzt so versucht,
bin ich da auf dem richtigen weg oder geht das so nicht.
Die Strings hab ich dann in der Variable aber wie kann ich sie nun
in einer Datei speichern bzw. wieder aufrufen.
Delphi-Quellcode:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TCDArchiv =
record
Album, Titel, Songs:
String;
end;
type
TForm1 =
class(TForm)
Edit_Band: TEdit;
Edit_Titel: TEdit;
Button1: TButton;
Memo_Titel: TMemo;
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
Archiv:TCDArchiv;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
Archiv.Album:=Edit_Band.Text;
Archiv.Titel:=Edit_Titel.Text;
Archiv.Songs:=Memo_Songs.Text;
end;
end.