Hirdetés
- Xiaomi 17 - még mindig tart
- Samsung Galaxy A26 - csak a szokásos
- Szívós, szép és kitartó az új OnePlus óra
- Poco X8 Pro Max - nem kell ide sem bank, sem akkubank
- Xiaomi 15T Pro - a téma nincs lezárva
- Betáblázta magát az Oppo
- Mobil flották
- Samsung Galaxy S26 - szeret, nem szeret
- Samsung Galaxy A56 - megbízható középszerűség
- Vivo X200 Pro - a kétszázát!
-
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!
- Logitech g29
- Új, Gamer félgép - MSI Z890 GAMING PLUS WIFI + Intel Ultra 7 265K + Corsair 2x16GB DDR5 6400MHz CL32
- ASUS Rog Ally Z1 Extreme, 2027.01.12-ig gyári garanciás, hálózati töltőjével, szilikon tokkal eladó!
- HP 250 G7,15.6",i5-1035G1,8GB DDR4,256GB SSD,WIN11
- Lenovo ThinkPad T480s,FHD,14",i5-7300U,8GB DDR4,256GB SSD,WIN11,TOUCH,jó akku
- Lenovo T495s Ryzen 7 pro 3700U, 16GB RAM, 512GB SSD, jó akku, számla, garancia
- GYÖNYÖRŰ iPhone 14 Pro Max 256GB Deep Purple-1 ÉV GARANCIA - Kártyafüggetlen, MS4398, 100% Akksi
- iPhone 17 Pro 256 GB Silver - Bontatlan !! www.stylebolt.hu - Apple eszközök - Számlás
- LG UltraGear 27GR95QE-B OLED Monitor! 2560x1440 / 240Hz / 0.03ms / G-Sync / FreeSync
- Xbox One / Xbox Series játékok
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

). Ugye Delphiben írod vagy valami hasonlóban (értsd ezalatt Object Pascal IDE) ?

