Forum: Object-Pascal / Delphi-Language
Delphi
by Jens Schumann,
9. Mär 2004
Wenn man in die Klasse von TFormCrypt schaut kann man folgendes erkennen:
memText: TMemo
Memo2: TMemo;
D.h. die Namen sind schon Ok.
Nur Ultimator hat die procedure Button1Click so verändert, dass es keine Methode mehr von
TFormCrypt ist. Deshalb werden die Memos nicht gefunden.
Forum: Object-Pascal / Delphi-Language
Delphi
by Jens Schumann,
9. Mär 2004
Hallo,
so sollte es gehen:
...
TTCryptForm = class(TForm)
Label1: TLabel;
Label2: TLabel;
Button1: TButton;
Edit3: TEdit;
Label3: TLabel;
Forum: Object-Pascal / Delphi-Language
Delphi
by Jens Schumann,
9. Mär 2004
Hallo,
das Memo in meinem Vorschlag heißt nicht Memo1 sondern memText.
Forum: Object-Pascal / Delphi-Language
Delphi
by Jens Schumann,
9. Mär 2004
Hallo Ultimator,
Du musst mit Streams arbeiten.
z.B.
procedure TFormCrypt.SaveCrypt(const Filename: TFilename);
var
MStream : TMemoryStream;
FileStream : TFilestream;
aByte : Byte;
begin
MStream:=TMemoryStream.Create;