- sziku69: Fűzzük össze a szavakat :)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Luck Dragon: Asszociációs játék. :)
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- Ivqkzy-: 2. gépem
- Magga: PLEX: multimédia az egész lakásban
- Steven: Sokat utazó kávéfüggők ide!
- eBay-es kütyük kis pénzért
- droidic: EA GAMES – élő emberrel a supportban 2025 ben
- btz: Internet fejlesztés országosan!
Új hozzászólás Aktív témák
-
-
<Adamsky>
nagyúr
Sziasztok!
A következőben kérném a nagyérdemű segítségét:
A helyzet az, hogy eddig csak apróbb - egy gépes - programokat írogattam Delphiben, és most egy olyan feladatom lenne, melyben a hálózati kommunikációt is meg kellene oldanom.
Az egész tulajdonképpen egy vizsgáztató rendszer. Van egy ''szerver'' progi, melyhez kliens (max. 50) gépek csatlakoznak. A vizsga kezdetén a kliens gépek bejelentkeznek a szerverre, majd az átküldi a kérdéseket (szöveg & kép). A vizsga végén a kliens gépek visszaküldik a szervernek a kitöltött tesztlapokat, és kész. A kérdésem az, hogy milyen adatbázist (BDE, Interbase (Firefox) - ezeket ismerem) és módszert használjak a feladat megoldásához. Jó lenne, ha tudnátok ajánlani vm. jó könyvet, linket ami segít a megoldásban, vagy ami még jobb lenne az egy példaprogram.
Válaszokat előre is köszönöm! -
<Adamsky>
nagyúr
''...hihetetlen bonyolultan az OnDrawColumns esemény felülírásával...''
Tök igaz!
Rövid keresgélés után akadtam egy kódra, melyet kisebb mértékben módosítva nekem müxik a dolog. Bővebben: link
(szívesen bemásoltam volna ide, de nem tudom, hogy hogyan lehetne megoldani, hogy szépen, formázottan jelenjen meg) -
<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. -
<Adamsky>
nagyúr
Igazából nem jutottam sokra. A lényeg valami ilyesmi lenne:
procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
const szoveg = '11,10,09,08';
begin
i := 0;
repeat
Edit1.text := copy(szoveg, 1+i*3, 2);
inc(i);
until i>3;
end;
Namármost a formon van 4db Editbox, és ez az előbbi kódrész az 1-esbe szép sorba beleírja a 11, 10, 09, 08 számokat. Ez -- mondanom sem kell -- így nem jó. Az ''i'' értékétől függően kellene az egyes számokat az ''i+1''-ik Editbox-ba beírni.
Lehet az Editbox-okat tömbe szervezni? pl:
EDoboz: array [1..4] of TEdit;
[Szerkesztve] -
<Adamsky>
nagyúr
Sziasztok!
A problémám a következő:
Van egy hosszú string-em, ami valahogy így néz ki: nn,nn,nn,nn ...
Az ''nn'' egy kétjegyű szám. Pl.: 17, 07, 03
Van mondjuk a formon 5db Editbox-om (Edit1, Edit2...)
Azt szeretném megoldani, hogy egy cikluson belül a megfelelő Editbox-ba bekerüljön az x-edik szám.
Pl: szamok (ez a string) = 23,12,05
Miután lefutott a program az egyes Editbox-okban a következők legyenek.
Edit1 << 23, Edit2 << 12, Edit3 << 05
A válaszokat előre is köszönöm.
![[kép]](http://prohardver.hu/pics/s/cl.gif "[kép]")
Új hozzászólás Aktív témák
Hirdetés
- Csak semmi szimmetria: flegma dizájnnal készül a Nothing Phone (3)
- Filmvilág
- Hardcore café
- 24 Hours of Le Mans
- Bemutatkozott a Poco X7 és X7 Pro
- NVIDIA GeForce RTX 5070 / 5070 Ti (GB205 / 203)
- Anglia - élmények, tapasztalatok
- Xbox Series X|S
- Samsung Galaxy Z Flip5 - ami kint, az van bent
- Death Stranding (PC)
- További aktív témák...
- Lenovo ThinkPad T14 Gen 5 Ultra-I7/64GB/512SSD/Érintőképernyő/garancia
- Lenovo ThinkPad T14 G3 I5-1245U/32GB/1TBSSD/Érintőképernyő/Garanciás.
- Dell Precision Munkaállomás 7750 17.3" i7-10850H/32GBRAM/1TBSSD/RTX3000/WIN11PRO
- EREDETI Apple Watch ULTRA óraszíjak (BLACK TITANIUM) - 49mm
- Apple Watch ULTRA 2 49 mm - Black Titan, Black Ocean Band - MAKULÁTLAN! - 3 ÉV GARANCIA
- BESZÁMÍTÁS! ASUS H610M I5 12400F 32GB DDR5 512GB SSD X 4060 8GB SPIRIT OF GAMER CLONE 3 Chieftec600W
- Apple iPhone 12 Pro 256GB, Kártyafüggetlen, 1 Év Garanciával
- Lenovo LEGION Pro 5 / Pro 7, Lenovo Yoga Pro gépek (RTX 4060 / 4070 / 4080 / 4090)
- BESZÁMÍTÁS! MSI B550 7 5800X 16GB DDR4 512GB SSD RTX 3070 8GB Rampage SHIVA Enermax 750W
- Csere-Beszámítás! Asus Tuf RTX 5070Ti 16GB GDDR7 Videokártya! Bemutató darab!
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: PC Trade Systems Kft.
Város: Szeged