function SelectRecord2

netFrame Syntax:

function SelectRecord2(aTable: TRPCTable; aSearchString, aSearchFields, aShowFields: string; aPreSelectField, aPreSelectString: string): Integer

Beschreibung:
SelectRecord2() gibt einen einfachen Listendialog aus aus dem eine Auswahl getroffen werden kann.
Nachdem eine Auswahl getroffen worden ist, ist der aktuelle Datensatz in der Table auf die Auswahl positioniert worden.

Parameter:

aTable: Die Tabelle die als Grundlage für die Auswahl dient
aSearchString: Suchtext nach dem die Datenmenge durchsucht werden soll
aSearchFields: Suchfelder in denen gesucht werden soll
aShowFields: Welche Felder sollten im Darstellungesgitter angezeigt werden. Bitte beachten sie hier die Syntax (Feldname;Überschrift;Breite im Grid)
aPreSelectField: Über welches Feld soll eine Vorpositionierung stattfinden
aPreSelectString: Nach welchen Eintrag soll in dem aPreSelectField gesucht werden
Result: Gibt den Wert mrOK zurück falls der Benutzer eine Auswahl getroffen hat

Tipps

Nur wenn ein Eintrag in den Übergabeparamtern aSearchString und aSearchFields gemacht worden ist,

wird eine Suche durchgeführt.

Falls etwas gefunden wurde, wird die Datenmenge auf das Suchergebnis eingeschränkt.

Mit der Auswahlbox "Alle anzeigen" kann jetzt trotzdem auf alle Datensätze zugegriffen werden.

Die Auswahlbox ist nur aktiv falls eine Suche erfolgreich war in der Table.

Beispiel:


procedure selectTimeType(aSearchString: string);
begin
   if trim(aSearchString) =  then
   begin
      TimeTypeID := ;
      TimeTypeNumber := ;
      LookUpTimeType.Text := ; 
      TimeTypeText := '';        
   end else
   if SelectRecord2(TableTimeType, aSearchString, 
      'LU_NUMBER;LU_NAME', 'LU_NUMBER;Number;60;LU_NAME;Name;400',
      'LU_NUMBER', LookUpTimeType.Text) = mrOK then
   begin
      TimeTypeID := TableTimeType.fieldByName('LU_ID').asString;
      TimeTypeNumber := TableTimeType.fieldByName('LU_NUMBER').asString;
      LookUpTimeType.Text := TimeTypeNumber;         
      TimeTypeText := TableTimeType.fieldByName('LU_NAME').asString;        
   end;
end;