Edit(TrackBar1.Position).Text:='cos';

Edit(TrackBar1.Position).Text:='cos';
VE
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 11
0

Czy da się zrobić coś takiego ? Edit(TrackBar1.Position).Text:='cos';

_13th_Dragon
  • Rejestracja: dni
  • Ostatnio: dni
1

Konkretnie takiego - nie. Zaś realizujące to co masz na myśli owszem. Lepiej rozważ zrobienie tych Edyt'ów dynamicznie w konstruktorze od razu pakując je do tabelki.

0D
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 60
1

Czy chodziło Ci o coś takiego:

Kopiuj
TEdit(FindComponent('Edit'+IntToStr(TrackBar1.Position))).Text := 'cos';

To się nazywa odszukiwanie komponentów po nazwie.

KA
  • Rejestracja: dni
  • Ostatnio: dni
  • Lokalizacja: Gorlice
0

Znacznie wydajniej będzie wszystkie te Edit'y położyć na panelu i użyć czegoś takiego:

Kopiuj
TEdit(Panel1.FindChildControl('Edit' + IntToStr(TrackBar1.Position))).Text:= 'blabla';

a nawet nie bawiąc się w tablicę i dynamiczne tworzenie komponentów (tylko tu ważna jest kolejność dodania editów na panel):

Kopiuj
TEdit(Panel1.Controls[TrackBar1.Position]).Text:= 'blabla';
Azarien
  • Rejestracja: dni
  • Ostatnio: dni
0

Działa poprawnie, zaś przeszukuje wszystkie komponenty umieszczone na formatce w poszukiwaniu tej o podanej nazwie. Wydajność niska.
komponenty można utworzyć normalnie, a raz w konstruktorze czy gdzieś tam znaleźć je wszystkie i wsadzić do tablicy.

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.