🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.delphi
Article #347107

Re: Nazwy pól i na podstawie wartości

#347107
From: zpksoft
Date: Thu, 05 Dec 2019 06:40
39 lines
2615 bytes
W dniu środa, 4 grudnia 2019 11:44:19 UTC+1 użytkownik lordbz napisał:
> Witam grupę
> 
> 
> Od rana się borykam z pewną sprawą :
> 
> Chcę wyświetlić nazwe kolumny np. na listbox pod warunkiem, że wartość w polu w tej kolumnie = 0 
> 
> W bazie (firebird) mam w tabeli kolumny np : kol_1, kol_2, kol_3 itp aż do kol_10
> Typ integer ale może być zapisana w polu wartość 1 lub 0
> 
> Robię selecta z tabeli do grida. a następnie poprzez dataset z którego korzysta grid chcę wyświetlić nazwy kolumn np w listbox: 
> 
> b:=0
> if (smdbGrd.DataSource.DataSet.Fields.FieldByName('KOL_1').AsInteger =0) or (smdbGrd.DataSource.DataSet.Fields.FieldByName('KOL_2').AsInteger =0) then
> 
> listbox1.itemsAdd(b);
> 
> ewentualnie 
> 
> można by spróbować pominąć grida
> 
>   lst1.Items.Add(DMod.IBQ.DataSource.DataSet.FieldDefList.GetText) 
> 
> Chciałbym teraz wyświetlić nazwę kolumny np. na listbox pod warunkiem że w polu jest wartość 0
> 
> To coś jak DMod.DataSource.DataSet.FieldDefList.GetText ale zależne od wartości pola. 
> Chyba nie namieszałem. Może ktoś coś podrzuci ?
> 
>   kurcze to wydawało mi się proste a tu się zapętliłem. Coś naknociłem :-(   
> 
> Przemek

może taki trop:

if fields[i].value=0 then listBox.Add(fields[i].displayName);


Paweł
Technical Details
Message-ID: <7fe1dbaa-a4ee-4ad2-b576-690eb9e85316@googlegroups.com>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!wsisiz.edu.pl!goblin2!goblin1!goblin.stu.neva.ru!g89no7002658qtd.0!news-out.google.com!w29ni126qtc.0!nntp.google.com!g89no7002645qtd.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
References: <7ffc52e7-dcf7-473b-aefc-d8d5980d91e7@googlegroups.com>

Show Full Headers
Complete Article Headers
X-Received: by 2002:a05:620a:2193:: with SMTP id g19mr6934345qka.317.1575528039693;        Wed, 04 Dec 2019 22:40:39 -0800 (PST)
X-Received: by 2002:a9d:554f:: with SMTP id h15mr5751246oti.338.1575528039372; Wed, 04 Dec 2019 22:40:39 -0800 (PST)
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!wsisiz.edu.pl!goblin2!goblin1!goblin.stu.neva.ru!g89no7002658qtd.0!news-out.google.com!w29ni126qtc.0!nntp.google.com!g89no7002645qtd.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: pl.comp.lang.delphi
Date: Wed, 4 Dec 2019 22:40:39 -0800 (PST)
In-Reply-To: <7ffc52e7-dcf7-473b-aefc-d8d5980d91e7@googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=217.99.173.49; posting-account=8ND_mgoAAAD5J9y9fnaTB1Kcu7xKWk7Q
NNTP-Posting-Host: 217.99.173.49
References: <7ffc52e7-dcf7-473b-aefc-d8d5980d91e7@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <7fe1dbaa-a4ee-4ad2-b576-690eb9e85316@googlegroups.com>
Subject: Re: Nazwy pól i na podstawie
 wartości
From: zpksoft <zpksoft@op.pl>
Injection-Date: Thu, 05 Dec 2019 06:40:39 +0000
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit