- Ismét egy "Idióta" A.I. Projekt, hogy meglovagolja az aktuális trendeket...
- Időutazás floppyval: A 486-os visszavág PCem-men
- AMD Ryzen 9 9900X (100-100000662WOF)+ Samsung 990 PRO 2TB MZ-V9P2T0BW
- Processzor és videokártya szilícium mag fotók újratöltve!
- Az e-sport napistenének ajándéka: Lamzu Inca gamer egér
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- gban: Ingyen kellene, de tegnapra
- Luck Dragon: Asszociációs játék. :)
- droidic: Időutazás floppyval: A 486-os visszavág PCem-men
- Elektromos rásegítésű kerékpárok
- sziku69: Fűzzük össze a szavakat :)
- Gurulunk, WAZE?!
- Fogkefe: elektromos vagy manuális?
- Rap, Hip-hop 90'
- LordAthis: Ismét egy "Idióta" A.I. Projekt, hogy meglovagolja az aktuális trendeket...
Ú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.
Új hozzászólás Aktív témák
- Xbox tulajok OFF topicja
- OLED TV topic
- Bambu Lab 3D nyomtatók
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- Linux felhasználók OFF topikja
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Lexus, Toyota topik
- PlayStation 5
- Milyen légkondit a lakásba?
- Mobil flották
- További aktív témák...
- AOC 27" 27G2U Full HD 144Hz monitor eladó!
- LG 28bk550Y 28 colos Full HD monitor eladó! Jótállással!
- Eladó 1250W/1800W/2000W Tápegységek próbagaranciával! Posta ok!
- PowerColor Red Devil RX6700 XT 12GB eladó
- HP Elite x2 1012 G1 Touch 2in1 LTE/4G Win10 Tablet lecsatolható bill. 100%ÚJ Akku, üzletből, 27%ÁFÁS
- Bomba ár! Dell Latitude 5320 - i5-11GEN I 16GB I 256SSD I HDMI I 13,3" FHD Touch I Cam I W11 I Gari!
- Új és régi konzolok Okosítása/Softmodoloása, és Szoftveres szintű javítása - RÉSZLETEK A LEÍRÁSBAN
- GYÖNYÖRŰ iPhone 13 mini 128GB Midnight -1 ÉV GARANCIA - Kártyafüggetlen, MS3060, 94% Akkumulátor
- Telefon felvásárlás!! iPhone X/iPhone Xs/iPhone XR/iPhone Xs Max
- Telefon felvásárlás!! Xiaomi Redmi Note 12, Xiaomi Redmi Note 12 Pro, Xiaomi Redmi Note 12 Pro+
Állásajánlatok
Cég: FOTC
Város: Budapest