Strings aus dbgrid auslesen

[The_Doomed]

hi
hab da n kleines problem und zwar hab ich bei meinem prog im
hintergrund eine dbgrid in die werte eingetragen werden

diese will ich jetzt auslesen und in einer listbox ausgeben lassen
mein problem ist dass ich nicht weiß wie ich auf die felder bzw
die strings in den feldern zugreife

hatte an ein array gedacht aber das klappt ni wirklich

und wenn ich die felder anspreche kommt immer das string und TField
nicht kompatibel sind was ja auch nur logisch ist ^^

danke schon mal im voraus
:coder2:

The_Doomed

[mkinzler]

Da ein DBGrid nur eine Visualisierung des dahinterliegende DataSet ist, würde ich die Informationen dort auslesen.

Delphi-Quellcode:

DBGrid.DataSource.DataSet

[The_Doomed]

dann bleibt aber trotzdem das problem wie ich dann auf die strings zugreife welche dort gespeichert sind

[mkinzler]

1. Sind es Werte (konnen neben Strings auch Integer, Floats usw. sein)
2. Mit

Delphi-Quellcode:

DBGrid.DataSource.DataSet.FieldByName('<Feldname>').Value

kann auf den Wert des Feldes mit dem Name zugegriffen werden

[The_Doomed]

danke klappt wunderbar
ps klar sind es werte, in meinem programm halt aber eben strings
und es hätte ja sein können dass es beim auslesen unterschiede gibt
deswegen hab ich strings geschrieben

[The_Doomed]

noch mal ne frage wie kann ich strings bzw. werte aus editfeldern in diese DBGrid übertragen

[mkinzler]

Auch in dem man sie in das DataSet schreibt.

[The_Doomed]

wies sieht der befehl dazu aus
DBGrid.DataSource.Dataset.???

[DeddyH]

Append zum Anlegen, Edit zum Ändern. Zum Schluss mit Post schreiben.

[mkinzler]

Delphi-Quellcode:

DBGrid.DataSource.Dataset.Append;
DBGrid.DataSource.Dataset.FieldByName('<1. Feld'>).Value := <1. Wert>;
...
DBGrid.DataSource.Dataset.Post;

[The_Doomed]

danke

[The_Doomed]

hab noch mal ne frage ^^

und zwar will ich dass er den aus der DBGrid gelesenen Wert vorher noch mit dem list eintrag vergleicht
und wenn er doppelt ist ihn nicht hinzufügt sondern erst fragt
weiteres problem ich möchte dass die listeinträge ein TObject ranbekommen der mit einem autoinc eintrag aus dem
DBGrid identisch is um einen rückbezug zu haben aber autoinc und integer verstehen sich nicht

Code:

procedure TForm1.Button3Click(Sender: TObject);
var n,i:integer;
f:array [0..100] of string;
begin

for n := 1 to Listbox1.Count +1 do
  begin
    if DBGrid1.DataSource.DataSet.FieldbyName('Name').Value=f[i] then //Vergleich von Name aus liste und DBGrid funzt nicht
edit2.text:='1';
  end;
  if edit2.Text='1' then
  begin
   form2.showmodal;

      end
      else Listbox1.Items.Addobject(DBGrid1.DataSource.DataSet.FieldbyName('Name').Value, Tobject(DBGrid1.DataSource.DataSet.FieldbyName('ID').Value)); // anfügen eines TObjects welches den wert von ID aus dem DBGrid liest funzt nicht 
  end;

[mkinzler]

Dann wäre DataSet.Lookup() aber besser.

[The_Doomed]

das beantwortet weder meine frage vollständig noch hilft es mir viel ^^

[mkinzler]

StrToInt() bzw. TryStrToInt()
-IndexOf ersetzt Schleife über Eintraäge

[The_Doomed]

hm na ja bei der schleife ist das prob dass der die irgendwie ni vergleicht

[mkinzler]

Ich würde statt einem Array ein Stringliste verwenden und dann .IndexOf verwenden.

[The_Doomed]

aber mit ner listbox geht ja indexof auch habs jetzt kapiert worauf du hinauswolltest muss jetzt noch testen obas das mit dem strtoint bei der ID klappt dann wärs perfekt

[mkinzler]

Wo kommen die werte her?

[The_Doomed]

na das sind autoinc werte die schreibt die dbGrid selbst aber es scheit zu klappen
(sind einfach nur zahlen, aber konnte sie halt ni als integer laden wusste aber auch ni dass es strings sind)

das vergleichen klappt übrigens danke

gibts ne procedure die dann beginnt wenn ich ein list item selecte also auswähle?

[mkinzler]

Dann würde ich eine Lookup-Kompo nehmen.

[The_Doomed]

wie funktioniert die ?

[mkinzler]

.ListSource auf DataSource setzten und bei .ListField anzuzeigendes Feld, bei .KeyField zu übernehmendes Feld auswählen.

[The_Doomed]

und was soll mir das bringen ?? ich seh grad nich durch

[mkinzler]

Ich versteh auch nicht ganz was du willst.
Erst habe ich verstanden, dass du ermitteln willst, ob ein Wert in der Tabelle schon existiert (Lookup ist dann erfolgreich)
Dann sah es für mich aus, als ob es um sich um verhandene Werte einer weiteren Tabelle jandelt, dann wäre eine Lookup-Komponente die Lösung; hierbei bekommst du dessen Werte zur Auswahl.

[The_Doomed]

nee also ich hab eine DBGrid da werden werte reingespeichert
so diese Werte werden dann in eine listbox übertragen - dabei soll ermittelt werden ob der wert der übertragen wird schon vorhanden ist - das funzt jetzt prima
außerdem soll dem listboxeintrag eine art platznummer zugeteilt werden welche mit der in der DBGrid übereinstimmt
so das klappt jetzt alles

mein prob jetzt besteht darin dass ich jetzt diesen rückbezug herstellen muss

das prog soll jetzt also wenn ich auf einen listbox eintag klicken eine procedure beginnen -

1. prob kp wie ich das hinbekomme dass er die procedure ausführt wenn ich ein item selecte (in der listbox)

2.Prob er soll anhand der vorher zugewiesenen platznummer die restlichen werte aus der DBGrid lesen und in edits oder labels wieder ausgeben

frage ist jetzt also was ich am besten als platznummer nehme (momentan hab ich TObject(StrToInt(DBGrid...FildByname('ID').value))
das scheint auch zu funzten man muss jetzt im prinzip diese Tobject auslesen und in der DBGRid den wert der diese zugewiesene ID hat suchen

[mkinzler]

Sollen nur bestimmte Werte oder alle übertragen werden?
Bei allen wäre doch eine DBLookupListBox ideal.

[The_Doomed]

na ja es soll wenn ich ein listbox.item selecte nur von diesem einen der wert (Tobject) ermittelt werden z.B 5
und dann in der dbGrid gesucht werden (würde bedeuten dass der eintrag an der 5 stelle steht)
und die zeile (row) worin er sich befindet markiert werden
theoretisch könnte auch gleich die zahl aus dem TObject als zeilennummer in der DBGrid verwendet werden
nur weiß ich nicht wie ich das mache dass er in der Grid die richtige zeile markiert und wie ich es hinbekomme dass er das jedes mal macht wenn ich in der listbox die auswahl ändere (müsste sowas wie OnChangeSelction geben)

[mkinzler]

Wir drehen uns im Kreis:
-Wo kommen die Werte der ListBox her?
-Sind diese Werte mit den des Grids identisch?

[The_Doomed]

also die tobjcts kommen von der DBGrid spalte ID sind also mit denen der listbox identisch
allerdings kommen die elemente in der listbox durch sortieren durcheinander behalten aber ihre werte

[mkinzler]

Dann schau die die Lookup-ListBox nochmal genau an :zwinker:

[The_Doomed]

ok also das was dazu in der hilfe steht klingt schon mal
vielversprechend aber das wir trotzdem wieder ein akt da ich
das erste mal sowas programmiere ^^
also danke erstmal ich meld mich wenn ich noch mal fragen haben sollte ^^
:bounce1: :bouncing4: :freak:

[The_Doomed]

so also hab das jetzt mal mit ner lookoutlist probiert das klappt auch
nur hab ich da jetzt festgestellt das ich jetzt werder das prüfen auf
doppelte einträge noch das sorted=true verwenden kann
und dann muss es ja trotzdem noch irgendwie gehen dass ich die
anderen werte sofort angezeigt bekommen wenn ich ein item selecte

[The_Doomed]

??? wäre wichtig

[mkinzler]

Mir ist leider immer noch nicht klar, was du eigentlich vor hast.

[Der.Kaktus]

Zitat:

Zitat von mkinzler

Mir ist leider immer noch nicht klar, was du eigentlich vor hast.

Ich denke mal, er will z.B. einen Namen in der einen DB selektieren und dadurch z.B. die Auftraege dieses Namens aus einer anderen DB angezeigt bekommen.

[The_Doomed]

fast ich will dass wenn ich in einer list (lookuplist) einen eintrag auswähle er in labels die anderen sachen aus der dbgrid die zu diesem wert gehören anzeigt z.B. ich klicke einen namen an und das prog liefert den nachnamen und die adresse
diese wiederum befindet sich in der dbgrid in der gleichen zeile wie der name

[mkinzler]

Hab ich zwischendurch auch mal gedacht

Zitat:

fast ich will dass wenn ich in einer list (lookuplist) einen eintrag auswähle er in labels die anderen sachen aus der dbgrid die zu diesem wert gehören anzeigt z.B. ich klicke einen namen an und das prog liefert den nachnamen und die adresse
diese wiederum befindet sich in der dbgrid in der gleichen zeile wie der name

Dann reagiere bei Änderung der Auswahl mit einem Locate auf das DataSet.

[The_Doomed]

ja aber genau das is ja mein prob was muss ich benutzten damit er bei einer änderung reagiert
außerdem hab ich ja noch das prob dass er meine lookupliste nicht sortiert und dass ich den algo fürs
überprüfen ob ein eintrag schon vorhanden is ni mehr verwenden kann

[mkinzler]

-onClick
-Die Einträge im Lookup sind sortiert, wenn die Datenmenge, die dahinterliegt, sortiert ist.
-Locate auf Datenmenge