Hirdetés
- Fotók, videók mobillal
- Vivo X300 - kicsiben jobban megéri
- Poco F6 5G - Turbó Rudi
- Samsung Galaxy Z Fold7 - ezt vártuk, de…
- iOS alkalmazások
- Örömhír: nem spórol Európán a OnePlus
- Nagyot ugorhat a Poco M8 Pro
- Csak egy ország kap Exynos 2600-as Galaxy S26 telefonokat?
- Xiaomi 14T Pro - teljes a család?
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
Új hozzászólás Aktív témák
-
ViragL
tag
Hajrá! Nemtudom mennyire lesz összetett a program amit csinálsz, az általad talált delay függvényt sem ismerem, de így látatlanban azt mondom, hogy problémás lesz a dolog. Gondolom a jó öreg ''pascalos'' delay-t ültette át valaki delphibe, ha igazam van akkor az aktuális szál működését függeszti fel a paraméterben megadott időre, ha ez így van, akkor, mivel egy szálad van összesen az egész program működését felfüggeszti arra az időre, ergo se menü se semmi nem lesz használható addig. Nekem sok bajom volt vele anno, csak azért írom ezt ide, hogy ha hasolót tapasztalsz, tudd miért van.
MOD: nem off
[Szerkesztve] -
-
btotyi
tag
Ez működik :
Ctrl + 0 (nem numerikus taszton !)
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
If (key = $30) and (ssCtrl in Shift)
then
begin
edit1.Text := edit1.Text + 'Ř';
end;
end;
Az edit mező Font propertyn állíts be pld Arial fontot. -
ViragL
tag
Kikeresed az aktuális fontban a neked kellő karakter kódját, aztán az edit KeyDown metódusát megírsogatod. Annyit kell beleírnod, hogy, ha azt a billentyüt nyomja le a júzer, amit ki akarsz cserélni a sajátodra, akkor a Key paraméternek az új karakter kódját adod meg. Tipp, mert nem csináltam még ilyet, próbát megér. remélem értehtő
-
ViragL
tag
A szignatúra az eljárás/függvény neve+ a formális paraméterek száma és tipusa + függvényeknél a visszatérési érték tipusa. (a teljesség igénye nélkül
)
Ja, vagy írj saját függvényt, vagy keress egyet amivel megfelelő tipusura tudod konvertálni a nem megfelelő tipusu paramétert. Azt hiszem PChar -> PAnsiiChar konverterre lesz szükséged. A FillChar-ral is ugyanez a teendő. -
ViragL
tag
Jól érted, nem teljesen kompatibilisek az egyes Delphi verziók. A fejlődés során sok mindent újraírtak, megváltoztattak, így valóban van egy StrPCopy() függvény mindegyik Delphi SysUtils unitjában, az nem egyezik meg azzal amit a másik Delphi verzióban megírt program használni akar. A neve ugyanaz, de a szignatúrája külömbözik, ha jobban megnézed. Így, mivel Delphiben (is) túlterhelhetőek a nevek, a fordító nem azt a függvényt keresi, ami a SysUtilsban van, hanem egy olyat keres, aminek a szignatúrája megegyezik a hívott függvény szignatúrájával és mivel olyat nem talál, azt mondja, hogy nem deklarált eszközt akarsz használni.
MOD: nem egy egzakt megfogalmazás, de remélem érthető a lényeg.
[Szerkesztve] -
ViragL
tag
Nos a problémád oka az, hogy nem a megfelelő Delphi verzióval akarod fordítani a netröl leszedett programokat. A külömböző Delphi verziók nem véletlenül külömböző verziók.
Semmi nem garantálja, hogy a külömböző verziókban a függvények és egyéb eszközök specifikációja, működése megegyezik. -
) vagy használj timert. Csak tanács, anno szívtam vele, nem esett jól.
Új hozzászólás Aktív témák
- Nézzük élőben a The Game Awards 2025-öt!
- Milyen videókártyát?
- Fotók, videók mobillal
- Samsung kuponkunyeráló
- Kétszáznál is több játékhoz hozta el az FSR Redstone-t az új AMD Software
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Több száz játékban kezdi meg karrierjét az FSR Redstone
- Elemlámpa, zseblámpa
- TGA2025 - Lara Croft felbukkanása már szinte borítékolt
- Diablo IV
- További aktív témák...
- DJI Air 3 drón szett - telefonos távirányítóval
- Xiaomi 13T Magánszemélytől Garanciával
- ASUS ROG PG39WCDM Ívelt Gamer Oled Monitor!39"/2k ultrawide/240hz/0,03ms/Gsync-Freesync/Type-C/!
- Akciós! Makulátlan MacBook Pro 16" i9 16GB 1TB 5500M asztro szürke részletek a leírásban.
- UF Lenovo Yoga 9i x360 Érintős Hajtogatós Laptop Tab 14" -50% i7-1360P 16/1TB Iris Xe 2,8K OLED 90Hz
- Apple iPhone XR 64GB, Kártyafüggetlen, 1 Év Garanciával
- Telefon felvásárlás!! iPhone 13 Mini/iPhone 13/iPhone 13 Pro/iPhone 13 Pro Max
- Samsung Galaxy S23+ / 8/512GB / Kártyafüggetlen / 12Hó Garancia / Gyári Gari 2026.02.21.
- Samsung Galaxy A34 5G / 6/128GB / Kártyafüggetlen / 12Hó garancia
- Thermalright Aqua Elite 360 V3
Állásajánlatok
Cég: BroadBit Hungary Kft.
Város: Budakeszi
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest