Delphi Schulaufgaben

[ridom]

Sry wegen dem Ergebnis xD ehem joa du wie gesagt steh immoment ziemlich auf dem Schlauch

ehm mit dieser methode

Delphi-Quellcode:

begin
zeichen:= edit1.text;
  for i:= 0 to 0 do
    begin
      ergebniss:=' ';
        memo1.Lines.Add(ergebniss);
        for j:= 7 downto 3  do
          begin
            ergebniss:=ergebniss + zeichen ;
            memo1.Lines.Add(ergebniss);
          end;
    end;

end;

bekomm ich das hier raus

x
xx
xxx
xxxx
xxxxx