Új hozzászólás Aktív témák
-
wolffy
aktív tag
válasz
<Adamsky>
#1065
üzenetére
Na igen, így is lehet.
Én is gondoltam az SQL-re de nem is volt rossz ötlet az új tábla a lehetséges típusnevekkel, mert így már a felvitelnél is tudom a usert kényszeríteni egy DBComboBox-szal, hogy a típusneveket egyféle formában vigye fel. (Ne legyen az egyik kis-, a másik nagybetűvel, vagy keverve.) Lot of thanx a segítségért!!! -
wolffy
aktív tag
válasz
<Adamsky>
#1062
üzenetére
Bocsi, valamit elnéztem, sikerült újabb ADOTable feldobása nélkül is. Működik a dolog ahogy kell, viszont még valamit nem vettem figyelembe.
A hivatkozott mezőben ugyanaz a rekord többször is előfordul. (pl. egy típusmegnevezés akár 40-szer előfordulhat, mivel két készülék típus lehet ugyanaz, a gyári szám különbözteti meg őket, ami egy másik mező) Na lényeg a lényeg, hogy érhető el, hogy ugyanaz a rekord csak egyszer szerepelje a ComboBox-ban? -
wolffy
aktív tag
válasz
<Adamsky>
#1058
üzenetére
Nos a gond csak annyi a példával, hogy én ADO-t használok és nem BDE-t. DBTable esetén a példádban OK a dolog, de ADOTable esetén ez a bookmarkosdi nem igazán jön össze valamiért.
A konkrét megoldandó probléma egyébként annyi lenne, hogy van egy ComboBox és Button. Ha a Button-re kattint a user, akkor a ComboBox feltöltődik egy ADOTable segítségével hivatkozott adattábla első mezőjének adataival.
Ha tudnál segíteni, klassz lenne. Köszi! -
btotyi
tag
válasz
<Adamsky>
#560
üzenetére
IBExpress csomag (Delphi InterBase fül)
IBDatabase, IBTransAction, ListBox, BitBtn felrak egy formra. IBDataBase default transaction beállít IBTransAction1-re. Dupla katt IBDataBase1-en. Adatbázis jellemzők beállít. BitBtn1.OnClick-be beír :
IBDatabase1.GetTableNames(ListBox1.Items,False); // A boolean érték azt jelzi hogy kellenek-e a system táblák.
Program futtat gombra kattint és a listboxban megjelennek az adott adatbázisban található táblák. -
<Adamsky>
nagyúr
válasz
<Adamsky>
#367
üzenetére
Na újabb probléma:
Futás közben hozok létre egy Interbase adabázist és benne három táblát.
Ha az adatbázis kapcsolatot megszüntetem (IBDataBase.Connected := false) majd később újra csatlakozni szeretnék, akkor ezt a hibaüzenetet kapom:
''Your user name and password are not defined'' -- pedig igen! Nem értem.
A forráskód Bővebben: link
Alulról a 10 & 11 sor aktívvá tételével jön elő a hiba. -
lao ce
aktív tag
válasz
<Adamsky>
#206
üzenetére
jol indultal el. en csinalnek egy ciklust ami az osszes komponensen vegigmegy, aztan ha editboxhoz er amibe masolni kell valamit, akkor beirnam az aktualis szamot, amit viszont egy szamlalo kell mutasson...
a kulcs amit en megneznek a helpben a ComponentCount, a Components es az 'as'. ezek alapjan mar meg tudod irni a programot, alabb irom az en valtozatomat amit nem ellenoriztem szoval lehet hogy hibas valahol.
const
szoveg = '11,10,09,08';
var
szamlalo : integer;
szamlalo := 1;
// szamoljunk osszes komponenst
for i := 0 to ComponentCount-1 do begin
// vajon ez egy edit box amibe irni kell?
// persze, az edit neve Edit1...Editx, tehat csak az elso 4 karaktert kell nezni
if copy (Components.Name, 1, 4) = 'Edit' then
...//igy csinalhatsz a tipustalan komponensbol editboxot,
...//es erheted el a value prop-t:
...(Components as TEdit).Value := copy(szoveg, szamlalo, 2);
// harmasaval egyszerubb, i-t nem lehet hasznalni mert az osszes
// komponenst megszamoljuk a formon, azokat is amik nem edit boxok
szamlalo := szamlalo + 3;
end;
ha van harom edit box-od akkor kitolti, ha felteszel egy negyediket akkor is kitolti a nelkul hogy a programban valtoztatnal. -
Én is gondoltam az SQL-re de nem is volt rossz ötlet az új tábla a lehetséges típusnevekkel, mert így már a felvitelnél is tudom a usert kényszeríteni egy DBComboBox-szal, hogy a típusneveket egyféle formában vigye fel. (Ne legyen az egyik kis-, a másik nagybetűvel, vagy keverve.) Lot of thanx a segítségért!!!
A hivatkozott mezőben ugyanaz a rekord többször is előfordul. (pl. egy típusmegnevezés akár 40-szer előfordulhat, mivel két készülék típus lehet ugyanaz, a gyári szám különbözteti meg őket, ami egy másik mező) Na lényeg a lényeg, hogy érhető el, hogy ugyanaz a rekord csak egyszer szerepelje a ComboBox-ban?
Új hozzászólás Aktív témák
- Airsoft
- Kínai és egyéb olcsó órák topikja
- 5.1, 7.1 és gamer fejhallgatók
- Milyen TV-t vegyek?
- Túra és kirándulás topic
- Meggyi001: Kórházi ellátás: kuka vagy finom?
- Vezeték nélküli fülhallgatók
- Kerékpárosok, bringások ide!
- Miért vezet mindenki úgy, mint egy állat?
- Gaming notebook topik
- További aktív témák...
- Google Pixel 10 Pro 256GB, fekete + Pixel Watch 4 45mm LTE + Ajándék: Google Pixel Buds Pro 2
- -ÚJ,2 ÉV GAR- DDR5 GAMER PC: RYZEN 7 8700F/9700X/9800X3D +RX 6600/6700XT +16-64GB DDR5! SZÁMLA!
- Dell Latitude 7430 x360 Ütésálló Érintős Hajtogatós Profi Ultrabook 14" -60% i7-1265U 16/512 IRIS Xe
- HP E24m G4 Monitor FHD IPS webkamerával, Windows Hello-támogatással
- Lenovo ThinkPad T14 Gen 5 Ultra-I7/16GB/512SSD/FHD/garancia!
- GYÖNYÖRŰ iPhone 14 Pro Max 256GB Space Black - 1 ÉV GARANCIA, Kártyafüggetlen,MS3489, 100% Akksi
- GYÖNYÖRŰ iPhone 12 mini 128GB White -1 ÉV GARANCIA - Kártyafüggetlen, MS3856, 100% Akksi
- HP Pavilion 15-eg2002nh - 15.6" FullHD IPS - i5-1235U - 16GB - Win11 - 512GB SSD - Garancia - MAGYAR
- GYÖNYÖRŰ iPhone 13 mini 128GB Red -1 ÉV GARANCIA - Kártyafüggetlen, MS2159
- Bomba ár! Acer Aspire ES1 - AMD A8 I 8GB I 180GB SSD I 15,6" HD I HDMI I Cam I W10 I Garancia!
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest