Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi In der Tabelle suchen (https://www.delphipraxis.net/160219-der-tabelle-suchen.html)

Deep-Sea 3. Mai 2011 16:07

AW: In der Tabelle suchen
 
Dafür ist wohl das Event AfterScroll der Table/Query besser geeignet. Und darin dann z.B. mit
Delphi-Quellcode:
MeineTable.FieldByName('xyz')...
weiterarbeiten :wink:

Kleine 3. Mai 2011 16:13

AW: In der Tabelle suchen
 
hast du vielleicht ein beispiel quelltext?

Kleine 4. Mai 2011 08:38

AW: In der Tabelle suchen
 
damit komme ich nun nicht wirklich weiter :|

als ich noch die listbox hatte so der code so aus
Delphi-Quellcode:
procedure TFormMain.AdresseListBoxClick(Sender: TObject);
var
  Adresse : tAdresse ;
begin
  Adresse := tAdresse( AdresseListBox.Items.Objects[ Adresselistbox.ItemIndex ] ) ;
  RefreshKontaktListe( adresse ) ;
//   FormAdresse.Adresse := Adresse ;
end;
theoretisch müsste nur die zeile
Adresse := tAdresse( AdresseListBox.Items.Objects[ Adresselistbox.ItemIndex ] ) ;

geändert werden.
Nur weiß ich nicht genau wie

Deep-Sea 4. Mai 2011 09:02

AW: In der Tabelle suchen
 
Sry, ich weiß nun mal nicht wie deine Software aufgebaut ist.
Aber rein aus der Beschreibung "Beim wählen eines Datensatzes sollen gewisse Felder in einer ListBox angezeigt werden" würde ich es als Beispiel so machen:
Delphi-Quellcode:
procedure TForm1.Table1AfterScroll(DataSet: TDataSet);
begin
  ListBox1.Items.BeginUpdate;
  try
    ListBox1.Items.Clear;
    ListBox1.Items.Add('Telefon: ' + Table1.FieldByName('Telefon').AsString);
    ListBox1.Items.Add('E-Mail: ' + Table1.FieldByName('EMail').AsString);
  finally
    ListBox1.Items.EndUpdate;
  end;
end;
(Falls die Einträge in der ListBox aber wirklich so - mit Name-Werte-Paaren - sein sollten, wäre eine ListView imho praktischer. Naja, anderes Thema.)

DeddyH 4. Mai 2011 09:13

AW: In der Tabelle suchen
 
Vor allem musst Du Dich von Deinen Adressklassen gedanklich verabschieden (es sei denn, Du willst gleich eine Art OPF schreiben, aber das ist schon hohe Kunst).

[edit] BTW: Crossposts sollten verlinkt werden, sonst macht man sich auf Dauer keine Freunde. [/edit]


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:58 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz