devo far ripetere per un tot di volte una parte di codice, il valore di ripetizione che è un numero intero è contenuto in Tedit che comando devo usare?
devo far ripetere per un tot di volte una parte di codice, il valore di ripetizione che è un numero intero è contenuto in Tedit che comando devo usare?
Si lo ho trovato il ciclo For ma non riesco ad applicarlo in pratica:
Vorrei che il contenuto di TEdit si ripesse per il valore presente in un altro TEdit e che il risultato me lo riportasse in TRichEdit o equivalente
chiaramente devi controllare oppirtunamente il valore che scrivi nel tedit.codice:procedure TForm1.Button1Click(Sender: TObject); var i:integer; begin RichEdit1.Clear; for i:=0 to StrToInt(Edit2.Text)-1 do begin RichEdit1.Text:=RichEdit1.Text+Edit1.Text; end; end;
ciao