Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Definícia " dobré " premenné , ktoré sú optimalizované pre najlepší výkon vo vašom kóde . Vyhnite variantu a desatinné dátové typy pre vaše premenné . Varianty sú najhoršie typ premennej v programe VB pretože zaberajú veľa pamäte . Premenná bude definovaná ako variant , ak nie je definovaný žiadny typ dát . Napríklad , " Dim myVariable " byť variant , zatiaľ čo " Dim môj premenné ako Long " bude dlhý dátový typ . Dlhé dátové typy sú najrýchlejší a najúčinnejší dátový typ použiť pri práci s grafikou .
2
Pomocou " GetBitmapBits /SetBitmapBits " a " GetDIBits /StretchDIBits " rutiny v " Gdi32 " API . Každá z týchto rutín priamo odkazuje na dynamicky alokovanú pamäť na stroji , čo je super rýchly , ale buďte opatrní pri ich použití . Deklarovať typ rastrového obrázka , ktorý je potrebný pre " GetObject " rutina . Dôležité premenné typu bitmapy sú bitmapy šírka v pixeloch , výška bitmapy v pixeloch , šírka bitmapy v bajtoch a počet bitov na pixel v obraze . Funkcia " RGB ( imaged ( 2 , X , Y ) , imaged ( 1 , X , Y ) , imaged ( 0 , X , Y ) ) , " dostáva farbu obrazu umiestneného na XY určené .
3
Získajte umiestnenie myši , keď používateľ klikne na tlačidlo , alebo dvojité kliknutie s " GetCursorPos " rutina " user32 " API . Tiež definovať novú " PointAPI " Typ získať xy súradnicu kliknutia myši . Teraz , keď máte xy súradnice novo klikli pozíciu myši , môžete presunúť grafický objekt na dané miesto . Ak presunutie obrazu objektu , " picture1.location = nový bod ( x , y ) " sa bude pohybovať obrázok do nového umiestnenia . Pre lepší hovoru výkon " GetObject " , potom " SetBitmapBits . "