Hirdetés
- GoodSpeed: Nem vénnek való vidék - Berettyóújfalu
- eBay-es kütyük kis pénzért
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Mr Dini: Mindent a StreamSharkról!
- Luck Dragon: Asszociációs játék. :)
- Brogyi: CTEK akkumulátor töltő és másolatai
- sziku69: Fűzzük össze a szavakat :)
- Magga: PLEX: multimédia az egész lakásban
- GoodSpeed: 3I/Atlas: Üstökös vagy idegen civilizáció űrhajója?
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
Ú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
- OLED TV topic
- Facebook és Messenger
- Hét új család perli az OpenAI-t öngyilkosság miatt
- BestBuy topik
- Házimozi belépő szinten
- GoodSpeed: Nem vénnek való vidék - Berettyóújfalu
- Android alkalmazások - szoftver kibeszélő topik
- Apple iPhone 16 Pro - rutinvizsga
- Eredeti játékok OFF topik
- Számtech boltosok memoárjai, azaz amikor kiborulunk...
- További aktív témák...
- Precision 7560 27% 15.6" FHD IPS i7-11850H RTX A3000 32GB 1TB NVMe ujjlolv IR kam gar
- HP ZBook Studio G8 i7 32GB RAM 1TB SSD RTX A3000/Garancia
- iPhone SE 3 2022 128GB gyári független szép gyári 95% akku
- Precision 5560 27% 15.6" FHD+ IPS i7-11800H T1200 32GB 512GB NVMe ujjlolv IR kam gar
- ELADÓ iPad 9th cellular 64 GB space gray - "láthatatlan" karc a kijelzőn, képeket csatoltam
- BESZÁMÍTÁS! Asus H370 i5 9600K 16GB DDR4 512GB SSD RX 5700XT 8GB Rampage SHIVA CHIEFTEC 700W
- GYÖNYÖRŰ iPhone 13 mini 128GB Green -1 ÉV GARANCIA -Kártyafüggetlen, MS3898, 100% Akkumulátor
- Honor Magic7 Pro 5G 512GB, Kártyafüggetlen, 1 Év Garanciával
- HIBÁTLAN iPhone 14 256GB Midnight -1 ÉV GARANCIA - Kártyafüggetlen, MS3531, 93% Akkumulátor
- Lenovo ThinkPad L16 Gen 1 - 16" WUXGA IPS - Ultra 5 135U - 16GB - 512GB - Win11 - 2,5 év gari
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: Laptopműhely Bt.
Város: Budapest