procedure TForm1.ResizeText(Name: String );
var Prova: TRichEdit;
begin
Prova := TRichEdit.Create(Self) ;
Prova.Name := Name;
Prova.Height := tabcode.Height - 7;
Prova.Width := tabcode.Width - 7;
end;
Questo codice dovrebbe, secondo me, ridimensionare tutti gli oggetti (RichEdit) all'interno di ogni tab...però appena arriva sulla 6a riga, si blocca l'esecuzione del programma...Come mai?