TartalomFriss hozzászólások
Új fórum témákAktív fórum témákFriss blogbejegyzésekGoogle hirdetések |
folyamatos kép mozgatás
Casady, 2010, február 28 - 23:06
Sziasztok! a következő a problémám: képet szeretnék mozgatni a form-on folyamatosan egyenletes sebességgel. Úgy oldottam meg, hogy idózítővel x millisecundumonként egyik koordinátához adok +1 et. Működik, de a form (a háttér) átüt a képen mozgás közben. hogy is magyarázzam el, vibrál a mozgó kép, és így csúnya. van vmi ötletetek, vagy alternatív megoldás? Köszönöm! »
|
KeresésBelépésIndex TechPC Fórum
Origo TechbázisSG.hu |
form1.DoubleBuffered:=true;
form1.DoubleBuffered:=true;
De ha pl.: egy panel előtt is elmegy akkor az is kell hogy:
panel1.DoubleBuffered:=true;
Üdv.: Totó
kivágott kép
Köszönöm szépen, működik. Még azt hagy kérdezzem meg a témához kapcsolódóan, hogyan tudnék olyat képet használni, ami nem négyszög alakú, mert a delphi-ben nem tudtam a beillesztett kép keretét módosítani. például egy "kivágott" emberi alakot szeretnék mozgatni a formon. van rá mód hogy egy beillesztett képről levágjam a "felesleget", és csak az emberi alak silhouette-jével dolgozzak?
A megoldás a transparent tulajdoság
Image1.Transparent := True;
Csak a bmp vagy ico kiterjesztésnél működik a jpg-nél nem.
És a fehér részek átlászóak lesznek, nem is lehet például rákattintani ezeken a részeken. Az alak kontúrján kívűl legyen fehér a kép.
Ha a képen fehéret akarsz megjeleníteni úgy hogy ez a tulajdonság igaz, akkor egy kicsi más színt kell belekeverni azokon a helyeken ahol a fehérnek látszódnia kell. Tehát például a hexás színkód nem FFFFFF hanem FEFEFE
A jpg-nél pont ezért nem működik, mert ott még a fehér sem pontosan fehér.
Üdv.: Totó
tranparent
Nagyon köszönöm, de honnan tudom, hogy a kép mennyire fehér? van vmi progi, vagy funkció, ahol ezt lecsekkolhatom? tulajdonképpen digitális interaktív képregényt készítek, és így a nagyrésze fekete és fehér különböző árnyalata. tehát tudnom kellene elenőrizni.
paint
A legegyszerűbb ha a képet paint-tel nyitod meg, és radírral kitörlöd a felesleges részeket, majd bmp-ként mented.
De fotoshoppal is lehet.
A paint-ben lévő fehér, ha arra cseréled úgy jó. Ha meg kevert fehéret akarsz (ami nem lesz átlátszó) akkor az egyéni színek hozzáadásával a palettáról viheted a képre.
A paitn-ben decimálisan van megadva a szín: red 255 green 255 blue 255 a fehér. Ettől alig tér el, de már nem lesz átlátszó a r 253 g 253 b 253.
Üdv.: Totó
időzítés
hát először is köszönöm ismét a segítséget! olyan problémákat oldtok meg nekem pik-pakk amire régóta nem tudtam rájönni. szeretnék még kérdezni:
timer komponenst ismerem, de én úgy szeretném megoldani az időzítést, hogy parancsot adok, hogy ha bizonyos feltétel teljesült, várjon x másodpercet, vagy millisec-et, és csináljon vmit. nem tudom wait(idő) parancsot lehet-e használni delphiben.
pl: ha x=5, akkor wait(5sec), aztán újabb parancs. vmi ilyesmit szeretnék megvalósítani. hogyan tudnám ezt lekezelni?
Szervusz! A Wait() nincs a
Szervusz!
A Wait() nincs a Delphiben, de írhatsz egy ilyen nevű függvényt.
var
Form1: TForm1; t:integer;
implementation
{ TForm1 }
function Wait(i:integer):boolean;
var i:integer;
begin
t:=0 ;// a t nullázása
while i>t do begin application.ProcessMessages end;
//addig szünetelteti a ciklust ameddig a timer lép egyet, hogy a t //változhasson
result:=true;
//csak azért kell mert függvényként dekralátam, de még jó is lehet //valamire
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
t:=t+1; //esetleg lehet maximálni a t értékét a túlcsordulás //elkerülése végett if t>9999999 then t:=0;
end;
Üdv.: Totó
kösz
Köszönöm!
típusos fájl mérete
Hello! a típusos fájlnak van vmi méretbeli korlátozása? csak azért kérdem, mert oda gyűjtöm az adatokat, és szépen lassan növekszik. Nehogy egyszer azt mondja a program, hogy ennyi. Recordokat tartalmaz:
Type szemrec
rec.nev=string(20)...stb
Ha betöltöd (egyben az
Ha betöltöd (egyben az egészet) akkor a memória, ha mented a tárhely mérete biztos határ. Nekem még nem volt olyan probléma hogy megtelt volna valamelyik, ezért gondolom, hogy nincs más határ.
Üdv.: Totó