Re: Strings aus dbgrid auslesen
danke
|
Re: Strings aus dbgrid auslesen
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; |
Re: Strings aus dbgrid auslesen
Dann wäre DataSet.Lookup() aber besser.
|
Re: Strings aus dbgrid auslesen
das beantwortet weder meine frage vollständig noch hilft es mir viel ^^
|
Re: Strings aus dbgrid auslesen
StrToInt() bzw. TryStrToInt()
-IndexOf ersetzt Schleife über Eintraäge |
Re: Strings aus dbgrid auslesen
hm na ja bei der schleife ist das prob dass der die irgendwie ni vergleicht
|
Re: Strings aus dbgrid auslesen
Ich würde statt einem Array ein Stringliste verwenden und dann .IndexOf verwenden.
|
Re: Strings aus dbgrid auslesen
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
|
Re: Strings aus dbgrid auslesen
Wo kommen die werte her?
|
Re: Strings aus dbgrid auslesen
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? |
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:32 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz