Ĺadny brzuch
juz 5 dzien nad tym siedze.. nie wiem jak zrobic aby... gdy zanacze jakas pozycje na listboxie.. program.. pobieral mi jej wartosci i np. wysylal do pola Edit? moze mi ktos pomoc.. :)
Szkoda, że nie napisałeś czy chodzi Ci o C++ Builder czy o Delphi, no ale to i tak bardzo proste, wybrałem Delphi, przełożenie na C++ Builder jest bardzo proste(ogranicza się do zamiany "." na "->" i ":=" na "=" no i oczywiście zmiany deklaracji zmiennych), a kod wyglądaćbędzie tak:
procedure TForm1.ListBox1Click(Sender: TObject); var numer : integer; begin numer := ListBox1.ItemIndex; {pobieramy index elementu zaznaczonego} Edit1.Text := ListBox1.Items.Strings[numer]; {wyświetlamy element zaznaczony o odczytanym przez nas indeksie na Edit} end;
Mam nadzieję, że wszystko rozumiesz, jak by co to pytaj. Wybrałem procedurę ListBox1Click, gdyż zadziała ona wtedy gdy ktoś zmieni element zaznaczony na ListBox.
Pozdro for All
gg:4826295 | neohacker@interia.pl
Słuchaj,podejrzewam,że programujesz w Delphi.Jeżeli tak to w onclick komponentu ListBox wpisz:
procedure TForm1.ListBox1Click(Sender: TObject); begin Edit1.Text := ListBox1.Items.ValueFromIndex[list] end;
Wymieniony wyżej kod powinien działać,jeżeli nie,pisz(patryknusbaum@interia.pl)8)
Zasady są po to,aby je łamać... :crowd:
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Szkoda, że nie napisałeś czy chodzi Ci o C++ Builder czy o Delphi, no ale to i tak bardzo proste, wybrałem Delphi, przełożenie na C++ Builder jest bardzo proste(ogranicza się do zamiany "." na "->" i ":=" na "=" no i oczywiście zmiany deklaracji zmiennych), a kod wyglądaćbędzie tak:
procedure TForm1.ListBox1Click(Sender: TObject); var numer : integer; begin numer := ListBox1.ItemIndex; {pobieramy index elementu zaznaczonego} Edit1.Text := ListBox1.Items.Strings[numer]; {wyświetlamy element zaznaczony o odczytanym przez nas indeksie na Edit} end;
Mam nadzieję, że wszystko rozumiesz, jak by co to pytaj. Wybrałem procedurę ListBox1Click, gdyż zadziała ona wtedy gdy ktoś zmieni element zaznaczony na ListBox.
Pozdro for All
gg:4826295 | neohacker@interia.pl
Słuchaj,podejrzewam,że programujesz w Delphi.Jeżeli tak to w onclick komponentu ListBox wpisz:
procedure TForm1.ListBox1Click(Sender: TObject); begin Edit1.Text := ListBox1.Items.ValueFromIndex[list] end;
Wymieniony wyżej kod powinien działać,jeżeli nie,pisz(patryknusbaum@interia.pl)8)
Zasady są po to,aby je łamać... :crowd: