DBGrid zaznaczony wiersz

[rafalskraba]

Witam

Jak wyświetlić w dowolnym komponecie (Label, Edit) dane znajdujące się w w zaznaczonym wierszy DBGrid. Technologia bazodanowa Firebird.
Komponenty wykorzystane do zestawienia połączenia DataSet - DataSource - DbGrid

Pozdrawiam

Rafał

[Cyfrowy Baron]

Podobny temat był już poruszany w tym dziale forum. Na razie może to okaże się dla ciebie pomocne: http://programowanie.cal.pl/forum/viewtopic.php?f=21&t=1331#p9673

[rafalskraba]

Witaj,

podany przez Ciebie post jest interesujący,
ale nie mogę zastosować tego rozwiązania w moim projekcie.

Ja potrzebuję zrobić taką funkcję która po zaznaczeniu
wiersza w komponencie DBGrid wyświetla w nowej formatce wszystkie dane z zaznaczonego wiersza.
Dane te mają być wyświetlane w komponentach umozliwiających ich edycję tj. Edit lub Memo.

W pomocy jest opisne ustawienie zakładki na zanaczonym rekordzie.
Jak ową zakladkę ustawić na zaznaczonym rekordzie.
Myślę ze po ustawienie tej zakładki i odczytaniu nr wiersza w tablicy DBGrid mogę przy pomocy
polecenia SQL wyświetlić dane z wiersza DBGrid.

Pozdrawiam

Rafał

[Cyfrowy Baron]

Nie wiem czy to jest możliwe z DBGrid. Tutaj przydałaby się pomoc Corvis'a.

[rafalskraba]

Spróbuje jeszcze coś pokombinować z tym DBGridem może coś wymyślę.

Zaznaczanie i wyświetlanie ilości zaznaczonych wierszy działa

Kod: Zaznacz cały

int wiersz = DBGrid1->SelectedRows->Count;
   if(!wiersz)
   {
      ShowMessage("Nie zaznaczono wiersza");
      return;
   }
    else
      for(int i=0;i<wiersz;i++)
      {

      }
      ShowMessage(wiersz);


to tanto też powinno jakimś magicznym sposobem zadziałać.
Nie chce używać innych komponentów tzn. obcych firm myślę ze z pomocą Corvisa coś uradzimy

Pozdrawiam

Rafał

[rafalskraba]

Witaj,

pokombinowałem, pokombinowałem i wyszło.
Cała zabawa odbywa się nie komponencie DBGrid sle na DataSecie.

W zdarzeniu OnDblClick komponentu DBGrid
np kod wyświetlający formatkę, natomiast w zdarzeniu OnFormShow wywoływanej formatki
następujący przykładowy kod:

Kod: Zaznacz cały

int i=MainForm->DBGrid1->DataSource->DataSet->RecNo;
   Label1->Caption=i;
   Label2->Caption=MainForm->DBGrid1->DataSource->DataSet->FieldByName("PROJ_NR")->AsAnsiString;


Pozdrawiam Rafał

[Corvis]

rafalskraba - przekombinowałeś to na maxa.

Jeżeli ten twój DataSet to ClientDataSet to możesz zrobić to przy pomocy metody AfterScroll - jest ona wywoływana za każdą zmianą wiersza w bazie danych.

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

void __fastcall TForm1::ClientDataSet1AfterScroll(TDataSet *DataSet)
{
   // Tutaj Kod
   Label1->Caption = ClientDataSet1->FiledByName("NazwaPola")->AsString;
}
 

[rafalskraba]

Witaj Corvis

Dlaczego twierdzisz, że przekombinowałem na maxa. Ja nie chce wyświetlać każdorazowo poszczególnych elementów z DBGrida przy przewijaniu wierszy w w/w komponęcie.
Chcę np. wyświetlić i edytować w nowej formatce pierwszy wiersz a następnie wiersz 300.

Rafał

[Corvis]

Sorry zagapiłem się i nie widziałem tego posta.

Ale chcesz przez wpisanie numeru wiersza np. Przejdź do wiersza n.

Wpisujesz jakiś numer wiersza i cie tam przenosi i potem to edytujesz ?