Nybegynder spm.

Du skal ikke klikke på dialogerne, men på menupunktet, som skal anvende dialogerne.

Eller knappen hvis det er det, som du bruger

ahhh... prøver jeg da bare istedet :-) takker for det.

Tak Selv :-)

må jeg spørge om en ting til ?

Ja, selvfølgelig

jeg har nu lavet det hele, men den vil ikke gemme det som txt, hvad jeg troede den skulle kunne... kan det skyldes andet end det filter jeg sætter op ?

Hvad bliver det så gemt som?

Det er nemmere hvis du smider din kode med.

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Menus, StdCtrls;

type
  TForm1 = class(TForm)
    Memo1: TMemo;
    MainMenu1: TMainMenu;
    Filer1: TMenuItem;
    Om1: TMenuItem;
    Om2: TMenuItem;
    Gemsom1: TMenuItem;
    N1: TMenuItem;
    Afslut1: TMenuItem;
    OpenDialog1: TOpenDialog;
    SaveDialog1: TSaveDialog;
    procedure Afslut1Click(Sender: TObject);
    procedure Om2Click(Sender: TObject);
    procedure Gemsom1Click(Sender: TObject);
    procedure Om1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

uses Unit3;

{$R *.dfm}

procedure TForm1.Afslut1Click(Sender: TObject);
begin
  Close;
end;

procedure TForm1.Om2Click(Sender: TObject);
begin
  AboutBox.ShowModal;
end;

procedure TForm1.Gemsom1Click(Sender: TObject);
begin
  if SaveDialog1.Execute then
  begin
    Memo1.Lines.SaveToFile(SaveDialog1.FileName);
  end;
end;

procedure TForm1.Om1Click(Sender: TObject);
begin
  if OpenDialog1.Execute then
  begin
    Memo1.Lines.LoadFromFile(Opendialog1.FileName);
  end;
end;

end.


sådanne

Klik på savedialogen og sæt defaultext til txt, så bliver den gemt som txt fil.

prøver jeg da lige :-)

rigtig mange tak... nu virker det :-)

Godt. God weekend til alle.

Hvordan laver jeg en scroolbar hvis nu der står meget tekst i filen ?

starter med at oprette dit eget spm. :-) kan ikke hjælpe dig er ikke nået så langt endnu