RichEdit LoadFromFile - powtarzająca się czynność.

0
begin
if FileExists('plik1.txt') Then
  RichEdit1.Lines.LoadFromFile('plik1.txt');
 end;

Żeby nie powtarzać w kółko tego samego kodu... Jak mogę zrobić by tak ładował się każdy plik?

RichEdit1 >>>>> plik1.txt
RichEdit2 >>>>> plik2.txt
RichEdit3 >>>>> plik3.txt
RichEdit4 >>>>> plik4.txt

Numer RichEdit odpowiadałby numerkowi importowanego pliku...
Powiedzmy mam tych RichEdit na formie - 100 x, by aplikacja powyżej liczby 100 nie sprawdzała a jedynie z zakresu sta.

0
strI:=IntToStr(I);
TRichEdit(FindComponent('RichEdit'+strI)).Lines.LoadFromFile('plik'+strI+'.txt');

Radze w konstruktorze wypełnić tabelkę Tab:array[1..100]of TRichEdit; a tu nią się posłużyć.

1 użytkowników online, w tym zalogowanych: 0, gości: 1