-
Fototrend

Új hozzászólás Aktív témák
-
-
Knives94
csendes tag
Na igen, ilyennel én is próbálkoztam, ezt is kipróbáltam, csak az a baj, hogy nem úgy müködik mint a readkey. Ahogy eddig megfigyeltem, ha megnyomom a felfele nyilat nem küld 0-t el...:-|; gondolom ennek van 4 külön "index". Fogalmam nincs hol tudnék utánnanézni, a dokumentációban sem találtam, de a rendes gombok viszont ascii szerint vannak bene(a,b,c..enter,space stb.). Ezért mondtam, hogy a legtöbb.
Ha érthetetlenül fogalmaztam előzőleg, vagy most, elnézést, csak mostanában nem tudok figyelek annyira... -
Knives94
csendes tag
(fpc 2.4, vfgx unit link: http://www.venomsoftware.de)
hello,
Arról lenne szó, hogy ennek a unitnak van úgye egy sajátos gombhasználata, és azt, hogy melyik gomb azt egy tömb-ben tárolja (Ktaste). Ebben a legtöbb gomb az ascii szerint van benne, csak arra vagyok kiváncsi, hogy mi az indexe a nyilaknak, vagy 1 olyan linket szeretnék, ami minden indexének megadja, hogy melyik gomb. (index alatt értem ktaste[index]).pl: "ha megnyomják az entert" if Ktaste[13] then ...
köszönöm.
-
Knives94
csendes tag
Hello VGFX ismét:
miért van az h így lefut?
sz1:=0;
repeat
init_VW(eredmeny,szelesseg,magassag,true);
flip_VW(vwhatter.offset,eredmeny);if sz1<=294 then begin
kill_VW(ireteg);
kill_VW(ujreteg);
sz1:=sz1+1;init_VW(ujreteg,294,185,true);
scalesprite(reteg02,ujreteg);
init_VW(ireteg,sz1,185,true);
putsprite(ireteg,ujreteg,0,0);
putsprite(eredmeny,ireteg,0,0);
end
else putsprite(eredmeny,reteg02,0,0);
flipp_DD(eredmeny.VWoffset);
kill_VW(eredmeny);
getallmessages;
handleminimalized;
until not(applicationRunning) or m_l;És így nem:
sz1:=0;
repeat
init_VW(eredmeny,szelesseg,magassag,true);
flip_VW(vwhatter.offset,eredmeny);if sz1<=185 then begin
kill_VW(ireteg);
kill_VW(ujreteg);
sz1:=sz1+1;init_VW(ujreteg,294,185,true);
scalesprite(reteg02,ujreteg);
init_VW(ireteg,294,sz1,true);
putsprite(ireteg,ujreteg,0,0);
putsprite(eredmeny,ireteg,0,0);
end
else putsprite(eredmeny,reteg02,0,0);
flipp_DD(eredmeny.VWoffset);
kill_VW(eredmeny);
getallmessages;
handleminimalized;
until not(applicationRunning) or m_l;különbség annyi kéne legyen, hogy az elsőnél jobbról balra pixelsoronként jelenik meg a kép, a másodiknál fentről lefele, pixeloszloponként.
a hiba a 217es, azaz valami nincs tárgyalva. -
Knives94
csendes tag
thanks
-
Knives94
csendes tag
mit jelent a 217-es exitcod free pascalban?
-
Knives94
csendes tag
Még 1 problémám van a vgfx-ben, van pl ez a kép:
http://prohardver.hu/dl/upc/2010-01/07/248581_lydnu7ibig8uaox8_kerdes_m2.jpgHogyan lehetne megoldani,hogy a fekete ne legyen látható mikor elinditjuk a programot, tehát csak az a narancssárgás, sárga izé látszodjon.
-
Knives94
csendes tag
A nyilakkal mi legyen? 0-val kezdődnek és 77 stb, ezeket hol találom a KTaste táblázatban? mármint mien index alatt.
Akkor probáld meg mikor mented hogy azt írod alma.pas v valami akkor talán nem txtben menti el
-
Knives94
csendes tag
Szerintem készíts egy shot-ot totalcommanderben, az elhelyezkedésről.
Már csak azért mert a kódban nincs hiba

-
Knives94
csendes tag
Na igen és még valami, leírná valaki, hol találom meg: a KTaste tömbben meik index meik gombot jelenti (pl. KTaste[13]=enter)
-
Knives94
csendes tag
Köszönöm, mostmár jól megy, de ezt a pontos elérési utat ki lehet küszöbölni?
-
Knives94
csendes tag
megpróbálom, azt hiszem megy
köszönöm -
Knives94
csendes tag
Üdv mindenki,

Én egy olyan kérdéssel fordulok (azokhoz akik használnak/használtak vgfx uses-t), hogy amikor megprobálok képet betölteni egy Sprite-be akkor kidob és azt írja nem létezik a fájl, pedig létezik, ez nem tudom miért van így. Erre szeretnék megoldást ha valakinek van.
Egyébként ez van írva free pascalba:{$ASMMODE INTEL}
{$APPTYPE GUI}
{$MODE FPC}
{$RANGECHECKS OFF}
{$Q-}
{$S-}
{$D-}program proba;
USES Windows,
VGFX,
VGFX_2D,
VGFX_Sprites,
VGFX_Text,
VGFX_win32,
VGFX_Files,
VGFX_Errors,
BigFile2,
SysUtils;CONST alkalmazas_nev: PChar = 'VGFXdemo';
szelesseg: Longint = 800;
magassag: Longint = 600;
var
reteg01:VirtualWindow;
reteg02:VirtualWindow;
hatter:VirtualWindow;
eredmeny:VirtualWindow;
i:integer;BEGIN
Window_RegisterClass(WIN_Normal);
Window_Main_Handle:= Window_CreateClass(alkalmazas_nev,WIN_Normal);
CheckWMCreate;
Init_Graph(szelesseg,magassag);
Load_Pcx('Image1.pcx','',Sprite01);
END.
mivel már a betöltésnél hibát jelez nem folytattam, ám nem helyességben hanem fájlétezésben...pedig létezik...

Új hozzászólás Aktív témák
● olvasd el a téma összefoglalót!
- Dell latitude 5420 i5-1145G7/ 16gb ddr4/ 250gb m.2 SSD
- Dell XPS 9350 13.4 /16:10/FHD+1920x1200/Intel Core Ultra 5 GEN2 226V/16GB/512GB SSD/ÚJ
- Számítógép, Laptop, I3-7.gen, 8GB DDR4, 240GB ssd, magyar bill, 15,6"-os Full HD kép, gyári töltő
- Apple Iphone 12 64gb Zöld
- Újszerű ELITE Xbox One Kontroller Series 2
- ÁRGARANCIA!Épített KomPhone i7 14700KF 32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- BESZÁMÍTÁS! SAPPHIRE B650M R7 8700F 32GB DDR5 512GB SSD RX 6800XT 16GB Zalman Z1 GIGABYTE 750W
- iKing.Hu - Apple iPhone 15 Pro Max Black Titanium Titán stílus, 5 optikai zoom 256 GB- Gari
- JBL BoomBox 2
- Akko 3098 /DE/PBT/RGB/Wireless/Hot swap/Yellow/Crystal switch
Állásajánlatok
Cég: BroadBit Hungary Kft.
Város: Budakeszi
Cég: ATW Internet Kft.
Város: Budapest




köszönöm


