Forum: Sonstige Fragen zu Delphi
Delphi
by ibp,
15. Jun 2004
@Chakotay1308 bei deinem code wird je durchlaufenes i und je durchlaufenes j je ein zeichen in eingstr addiert!...dh bei i=2 sind schon drei Zeichen hinzugekommen ! ... je i sollte dann eingstr zurückgesetzt werden !
gruß rené
Forum: Sonstige Fragen zu Delphi
Delphi
by ibp,
14. Jun 2004
@Chakotay1308 bei den ineinander geschachtelten schleifen sollte man dann eingstr:='' setzen sonst wird das nichts...
oder eben so..
procedure TForm1.Button1Click(Sender: TObject);
var i,j,k: integer;
eing: char;
eingstr:string;
begin
Forum: Sonstige Fragen zu Delphi
Delphi
by ibp,
14. Jun 2004
hi wie wäre es mit..
rocedure TForm1.Button1Click(Sender: TObject);
var i,j,k: integer;
eing: char;
eingstr:string;
begin
memo1.clear;
eingstr:='';
eing := edit1.text;