- iPhone topik
- Ulefone Power Armor 18T - látod, milyen meleg van?
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- Két nap múlva itt a Xiaomi 17, van egy pár hivatalos fotó is róla
- Xiaomi 15 Ultra - kamera, telefon
- Apple iPhone 16 - ígéretek földje
- Apple Watch Ultra - első nekifutás
- One mobilszolgáltatások
- Telekom mobilszolgáltatások
- Merész dizájn és új teleobjektív az iPhone 17 Pro mobilokban
-
Mobilarena
Új hozzászólás Aktív témák
-
Vico87
tag
válasz
b05styp #3260 üzenetére
Hello!
Látom senki sem válaszolt. Nos kicsit ügyetlen a kódod (bocsi, de tényleg
). Ugye Delphiben írod vagy valami hasonlóban (értsd ezalatt Object Pascal IDE) ?
Nézd meg a doksiban, hogy van-e valami String Tokenizer nevezetû dolog (én már nagyon régen nem Pascaloztam). Ha van akkor azt ajánlom, sokkal letisztultabb kódot eredményez. A string tokenizerek azt csinálják, hogy megadsz nekik két sztringet, az egyik a "felvágandó", a másik az "elválasztó", mire szétvágja a "felvágandót" "elválasztókkal" határolt részekre. Például : "Ez a mondat jaj fel lesz jaj vágva jaj tokenizerrel" , "jaj" bemenetek eredménye 4 sztring : "Ez a mondat", "fel lesz", "vágva", "tokenizerrel". Ezután csak annyi a dolgod, hogy összerakod a sztringeket, "hajaj"-t, illetve "jaj"-t a darabok közé ékelve.Ha nincs tokenizer, akkor sokkal szebb, ha csinálsz egy másik sztringet, ahova másolod az elsõt karakterenként, amíg 'j'-t nem találsz, megnézed, hogy "jaj" jön-e, ha igen, akkor a másik sztringhez hozzáadsz egy "ha"-t, és bemásolod a maradékot is.
Kerüld az if-eket egymás után, használj logikai kifejezést, mint pl
if (szo[i]='j' AND szo[i+1]='a' AND stb... ) then
begin
{ ... implementáció ... }
end;Remélem menni fog
Új hozzászólás Aktív témák
● olvasd el a téma összefoglalót!
- Kerékpárosok, bringások ide!
- PlayStation 5
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- iPad topik
- OFF TOPIC 44 - Te mondd, hogy offtopic, a te hangod mélyebb!
- sziku69: Szólánc.
- Borderlands 4
- AMD Radeon RX 7700-as VGA-val gyarapította kínálatát az ASRock
- Békéscsaba és környéke adok-veszek-beszélgetek
- További aktív témák...
- ÁRGARANCIA!Épített KomPhone Ryzen 5 7600X 32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- HIBÁTLAN iPhone 13 mini 256GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3440, 90% Akkumulátor
- Telefon felvásárlás!! Huawei P20 Lite/Huawei P20/Huawei P30 Lite/Huawei P30/Huawei P30 Pro
- Lenovo Thinkpad T14 Gen 3, 1 Év Garanciával
- Xiaomi Redmi 9 32GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: CAMERA-PRO Hungary Kft.
Város: Budapest