Hirdetés
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- ldave: New Game Blitz - 2025
- eBay-es kütyük kis pénzért
- Brogyi: CTEK akkumulátor töltő és másolatai
- Luck Dragon: Asszociációs játék. :)
- Lalikiraly: Astra kalandok @ Negyedik rész
- Lalikiraly: Kaáli Autó-Motor Múzeum
- gban: Ingyen kellene, de tegnapra
- 8th: A NOB legalizálja a doppingot?
- sziku69: Fűzzük össze a szavakat :)
Új hozzászólás Aktív témák
-
föccer
nagyúr
-
czappa
aktív tag
válasz
Jester01
#1183
üzenetére
Én úgy tudom, hogy nem kell oda begin-end, mert kapcsolóként működik és a végén az egész try-except részt zárja egy end; (de persze most kipróbáltam és minden maradt a régiben, így is).
A suliban amikor példaprogit írtam, akkor ''rendes'' számokat olvastattam be Edit mezőről, ott is ez volt.
VISZONT! és ez elég lol - elnézést is kérek érte:
Tehát, oké bejön ez a durva hibaüzi, de utána ha nem run->program resetet választok, hanem run->run-t akkor megy tovább a progi és meg is jelenik a ShowMessage ablaka...
Mert ugya progi ott ''kiakadt'' csak úgy tovább nem tudtam menni ezért kellett a run menüpont.
Ám ez kezdett gyanus lenni, így megnéztem, mi van ha nem a Delphiből futtatom a progit, hanem az .exe filet indítom. Nos ekkor tökéletesen működik... lol engem az zavart meg h a fordítóból ilyenkor elszált a progi, feljött a delphi saját hibaüzije, én meg csak a run-> menüvel tudtam tovább menni.
Azért köszi, és bocs h ilyennel fárasztottalak, ez azért tanunságos volt.
Viszont a másik problémámra tud vki. vmi. megoldást?
[Szerkesztve] -
#1132
Tele von Zsinór
őstag
Jester01
#1131
Tele von Zsinór
őstag
válasz
Jester01
#1131
üzenetére
Nem kooperatív, konkrétan egy RPG memóriájából akarom kiolvasni mennyi xp-m van, és a címsorába beírni, h mennyi van még következő szintig.
Volt pár gugli találat olyanról, hogy ReadProcessMemory, aminek kell egy cím, egy hossz, és egy buffer. Ha ez az amire gondolok, akkor már csak a process alapcímét kell kideríteni
Miért ne lehetne más proc memóriáját olvasni? Az írás az más téma, azt tényleg nem engedi a win. -
czappa
aktív tag
válasz
Jester01
#1126
üzenetére
Igen.
Két megoldást próbáltam, az egyik, hogy bár van mediaplayer, de nem a saját gombjait fogja használni a user, hanem én hozok létre gombokat (lejátszás stb.) és onClick eventre csinál valamit. Ezzel az a baj, hogy ha én pötyögöm be, hogy Wait:=true; Play; akkor a szám végéig nem tudok semmit sem csinálni, a progival (kilépni, stopra klikkelni, a formot áthelyezni, semmit)
A másik lehetőség az lett volna, hogy a mediaplayer saját gombjait használja a user, ám ez esetben fogalmam sincs hogyan mennek a ''dolgok'', továbbá itt nem értem mi van:
procedure TForm1.MediaPlayer1Click( stb...
begin
case Button of
btPlay :
begin
Label2.Caption:='111';
end;
btPause:
stb...
itt a Label2.Caption:='111'; sor csak proba miatt van, de sajnos ez történik meg előbb, mint a szám lejátszása, ill gondolom Borland képes volt megoldani azt, hogy egy szám lejátszás ne fogja meg az egész progit, túl. képp nekem is erre lenne szükséges, vagy tudnom kéne, milyen tulajdonsága változik meg a mediaplayernek ha befejezte a szám lejátszását. (de inkább az előbbi jönne jól, utóbbira néztem a helpet, de nem jöttem rá)
A legnagyobb gond, hogy nem értek hozzá, eddig két gyakom volt delphiből (persze ilyeneket nem vettünk).
''mint másik szálról hívni''
nos ez a baj, ezt már pl. nem értem, na mindegy majd talán máskor visszatérek még a progira.
[Szerkesztve] -
czappa
aktív tag
válasz
Jester01
#1123
üzenetére
Megnéztem, amit linkeltél, sajnos nem ezt kerestem; Ez akkor következik be, ha a user ráklikkel a stopra (pause-ra stb.-re). De nekem valami olyasmi kéne, ami tudatja, hogy véget ért a szám lejátszása.
A vicc az, hogy az általad linkelt oldalon még van is egy cikk a lejátszóról, de ilyet ott sem találtam.
A MediaPlayer1.Notify a delphi helpje szerint csak a mediaplayer gombjaira reagálnak
,
char; ismeretes, és ebből kellene a string)
Új hozzászólás Aktív témák
- iPhone 15 Pro MAX 256 GB, fekete, hivatalos garancia, 92% akku, tökéletes állapotban!
- újszerű iPhone 16 Pro Max 256GB natural titanium natúr titán független Apple garancia
- Precision 5560 15.6" FHD+ IPS i7-11850H RTX A2000 32GB 512GB NVMe ujjlolv IR kam gar
- 6-7 gen i5 T procik
- i5 12500/ RTX3060 12GB/ 32GB DDR4 alapú konfig/ garancia/ ingyen foxpost
- DJI Osmo Pocket 3
- Hisense 43A6BG 108 cm / 43" 4K UHD Smart TV 6 hó garancia Házhozszállítás
- Azonnali készpénzes Apple Macbook Air felvásárlás személyesen / csomagküldéssel korrekt áron
- ÚJ OMEN Transcend 14 - 14"2.8K OLED 120Hz - Ultra 7 155H - 16GB - 1TB - RTX 4060 - Win11 - 3 év gari
- HIBÁTLAN iPhone 14 Pro Max 128GB Purple -1 ÉV GARANCIA - Kártyafüggetlen, MS3918, 100% Akkumulátor
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: NetGo.hu Kft.
Város: Gödöllő