PureVisionXP ???????

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
Avatar de l’utilisateur
Fortix
Messages : 559
Inscription : mar. 30/mai/2006 17:03

PureVisionXP ???????

Message par Fortix »

Salut tout le monde :D

J'éssais actuellement un ancien truc du genre PureVisionXP
en genre d'alternative pour l'édition de fenêtre purebasic
(très intéressant pour skinner une fenêtre :) )

mais le souci est que une fois récuperation du code souce généré par ce dernier
dans PB, je reçois ce message:

la bibliotheque purebasic suivante est manquante: stringextension
:x
et pourtant j'ai parfaitement bien positionné la Lib de PureVisionXP
dans le dossier de PB :x

quelqu'un aurais une solution à ce problème :lol:

merci :D
gnozal
Messages : 832
Inscription : mar. 07/déc./2004 17:35
Localisation : France
Contact :

Re: PureVisionXP ???????

Message par gnozal »

Si je me souviens bien, stringextension n'existe plus depuis la version 4 de PB...

Version warez périmée de PureVisionXP ?
Avatar de l’utilisateur
Fortix
Messages : 559
Inscription : mar. 30/mai/2006 17:03

Re: PureVisionXP ???????

Message par Fortix »

possible :lol: , en fait, j'avais oublier de retirer ce topic :lol:

concernant PurevisionXP, je voulais l'utiliser uniquement pour le skinnage :lol:
mais depuis j'en ai fait un moi même :lol:

merci @Gnozal :D
Avatar de l’utilisateur
MetalOS
Messages : 1498
Inscription : mar. 20/juin/2006 22:17
Localisation : Lorraine
Contact :

Re: PureVisionXP ???????

Message par MetalOS »

Tu pourrai poser un screen ou deux de ton skinneur ?
Avatar de l’utilisateur
Fortix
Messages : 559
Inscription : mar. 30/mai/2006 17:03

Re: PureVisionXP ???????

Message par Fortix »

Salut @MetalOs
Je ne sais comment poser de "screen" :oops:
donc je préfère poster la source directement:

Code : Tout sélectionner

;/////////////////////////////
;//////FORTIX 2013////////////
;//////PURE-BASIC 5.11 32/////
;//////GENERATEUR DE SKIN/////
;/////////////////////////////

Procedure SkinWin(fenetre,Nimg,pochoir)
    Protected Region_Temp, Region_Totale, Largeur, Hauteur
    Largeur = ImageWidth(Nimg)
    Hauteur = ImageHeight(Nimg)
    Region_Totale = CreateRectRgn_(0,0,Largeur,Hauteur)

    If OpenWindow(fenetre, 0,0, Largeur, Hauteur, "", #PB_Window_BorderLess|#PB_Window_ScreenCentered)
        HideWindow(fenetre,1)	
	ImageGadget(fenetre, 0,0, Largeur, Hauteur, ImageID(Nimg))
        
        Largeur-1
    	Hauteur-1
                         
		StartDrawing(ImageOutput(Nimg))
        	For x_1=0 To Largeur    
            	For y_1=0 To Hauteur
            	
                	If Point(x_1, y_1)=pochoir
                    	y_2=y_1 
                          
                        While y_2<Largeur And Point(x_1, y_2)=pochoir
                        	y_2+1 
                        Wend 
                          
                        Region_Temp = CreateRectRgn_(x_1, y_1, x_1+1, y_2+1)
                        
                        CombineRgn_(Region_Totale, Region_Totale, Region_Temp, #RGN_DIFF) 
                        DeleteObject_(Region_Temp)
                           
                        y_1=y_2
                    EndIf    
                Next 
            Next    
            StopDrawing() 
            
        SetWindowRgn_(WindowID(fenetre), Region_Totale, 1)
        DeleteObject_(Region_Totale)
        HideWindow(fenetre,0)
        ProcedureReturn #True
    EndIf
EndProcedure


If CreateImage(0, 32, 32)
    StartDrawing(ImageOutput(0))
        Restore Firebug

        For ay=0 To 32-1
            For ax=0 To 32-1
                Read a.l
                Plot(ax,ay,a.l)
            Next ax
        Next ay
    StopDrawing()

    ay=0
    ax=0
EndIf

SkinWin(0,0,$000000)


Repeat
    Event  = WaitWindowEvent() 
Until Event = #PB_Event_CloseWindow 

End

DataSection
  Firebug:
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$2E5069,$1A435D,$45BFF6,$52D8F7,$000000,$32C4FE,$36BEFE,$000000,$40B0FC,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000009,$28677E,$4AD8FC,$3CD3F9,$41CEFA,$41B0E0,$3BADE6,$41C4FB,$3BA9EA,$40A1E5,$38C8FC,$44CCFF,$3FC3FC,$3DB3FC,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$091E31,$081127,$3181AA,$42BBF6,$51C9FD,$61CAFC,$65CEFF,$58CCFE,$35BFF2,$2874D0,$2868C8,$2D74C6,$3574BD,$43C7F2,$40BCFC,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$37A0C5,$3683B9,$5ACAFF,$7BD1FF,$89D3FF,$7FCBFD,$6DC6FC,$53C4FA,$4FB6F5,$4B8EE3,$326ED8,$2C57C2,$1F2A91,$255A9E,$42C6F8,$45E2F5,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$35EBF5,$38DEF6,$41C5FB,$45BAFF,$5CC4FE,$86CAF3,$A4CCED,$A2C0E7,$9BC3EF,$94D1FE,$81CAFF,$71CFFD,$46CDFA,$36BDFF,$37A8FE,$37A6F9,$34AEE7,$37A0D5,$3CE1F3,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$4CEBFE,$56DCF6,$53D5F9,$55BCF0,$3475B4,$224D83,$4C6C95,$7B8BAD,$939BBC,$97A2C8,$ADD2F4,$ABDEFF,$8ACCF9,$54B2ED,$3795DA,$2452A8,$3084ED,$348EF8,$3796F8,$389DED,$3DD0F1,$2FE7F6,$000000
  Data.l $000000,$000013,$0A0B21,$494955,$000000,$000000,$000000,$0B001A,$16576C,$55E0FC,$44ABDE,$40ABE2,$7EDCFD,$A8D8EA,$4F7992,$3D4F6B,$707C97,$8B93AF,$A1B1D1,$BBE4FF,$9BD0F9,$5F93D6,$3E7AC8,$284CA0,$0F0155,$1E40A7,$2B99FB,$2A99F6,$379DF6,$41C6F7,$2ED2F7,$30F0F5
  Data.l $000000,$000012,$0B0C22,$343548,$1E1F34,$27263B,$424B57,$1D7484,$18485C,$4391BB,$2A68A0,$2E77BF,$57C5FF,$BCEBFF,$C0F3FE,$5F8A9F,$475772,$667696,$91BDE1,$96DEFF,$66A5DF,$3450A2,$1F2B85,$151268,$11185E,$1785B4,$1CBCFD,$2898F7,$2FA8F7,$37BDF7,$31E2F6,$30EFF5
  Data.l $000000,$000014,$00000F,$090818,$130C22,$0A1731,$27A7B8,$2EE0EC,$28AEC0,$3B87AD,$275484,$204890,$3BA8F7,$62C5FD,$B1E9FF,$9CDEEF,$274564,$2B4472,$58B5EF,$50BEFF,$3891E4,$23439B,$204496,$215EA4,$2395D1,$1CB5FC,$2A7FF5,$3691F4,$49C8F5,$3DE4F5,$31EEF5,$30EEF5
  Data.l $000000,$000000,$000000,$000000,$176E79,$25C2CD,$29D0E0,$2CC2D7,$156077,$1E3056,$3966A1,$244588,$2760B2,$3FB4FF,$4DBEFC,$71DCFF,$42729D,$132573,$3AA4FB,$358DEF,$3494F7,$307CE2,$2A65CC,$2772E2,$248AF6,$288DF5,$318FF4,$47B8F4,$41E0F4,$2FE9F5,$30EFF5,$30EEF5
  Data.l $000000,$000000,$000000,$000000,$000000,$2FF4F9,$2F8CB4,$384C73,$2C2B44,$23233C,$1A2046,$3B609F,$18296B,$2B6FBD,$3FB5FF,$49C6FF,$5DA9D9,$2849AB,$348CEE,$284DB1,$2785E9,$2893FA,$298BF9,$248CF9,$209CF9,$22BCFA,$2DC9F7,$39CEF5,$2FD1F7,$2FE7F6,$30EFF5,$000000
  Data.l $000000,$000000,$000000,$000000,$30F0F6,$2DE6F0,$193763,$615C6D,$999AA4,$3B3C50,$0C0E2B,$192453,$36527F,$020434,$1F5498,$3DADF4,$5EBDF0,$3865D8,$2861C9,$244BB0,$2A7BF5,$257EF5,$228BF6,$2496F6,$2D92F4,$32AAF0,$32C1F5,$32CFF7,$2EE2F6,$30EFF5,$30F1F8,$000000
  Data.l $000000,$000000,$000000,$30F1F8,$30EFF6,$2EEBF3,$315466,$86828E,$72737E,$282A41,$030622,$00001A,$3C5887,$0B0D3C,$00001D,$0B2150,$51AAE4,$3C73EA,$2873EC,$2B94F2,$2A95F5,$2993F5,$33AEFA,$4FCBFA,$35BAEF,$31C3F3,$37DFF5,$33F0F6,$31F6FB,$30F6FD,$000000,$000000
  Data.l $00011A,$332D3E,$000000,$000000,$31F5FC,$2EB4C0,$2A3046,$3C3D50,$282B41,$0B0E2B,$080A29,$0E1936,$31527C,$3356A3,$141F72,$1A3C95,$4CA9EE,$3A83F1,$277DF5,$2991F6,$30A6F9,$4BBDFD,$7ED8FB,$61CBEC,$39D8F3,$35F0FA,$30F6FB,$31F0F6,$26BAC6,$2B7B88,$324355,$272035
  Data.l $000013,$0D0D21,$1C2338,$238693,$279DAA,$1F7487,$0C1230,$0D112F,$040724,$00001E,$41488D,$304A9A,$234D7A,$4697E6,$3377E9,$368AF2,$53B6F5,$3F9DF5,$3BA3F7,$5BC5FB,$80D5F8,$79C8E6,$54A1BD,$3492AC,$25A7B8,$26BFCB,$32B1BC,$32616F,$06081B,$100918,$211F34,$17182D
  Data.l $000000,$000000,$00000D,$1F969F,$32F4F8,$28C8D2,$00021D,$000015,$000011,$00001D,$040251,$000041,$15234B,$4589B2,$4DADE9,$4AB5F2,$5ACBF5,$52C5F0,$6CCBEB,$70C9E4,$47BFDD,$34B0C8,$2E798F,$1E4860,$0F3652,$104862,$1C5067,$0D0A1A,$000000,$000000,$000009,$000013
  Data.l $000000,$000000,$000000,$000000,$1A8B9A,$2291A4,$1D304C,$0B0B27,$0C0A22,$03031D,$040727,$0E2647,$1F597D,$182743,$387892,$46AAC8,$3D98B7,$2F86A7,$31B8D3,$32D0E3,$35CCD9,$29B6C3,$2DD5DF,$2EDEE7,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$105660,$2CDDE8,$36DAE4,$248092,$1D6C82,$25A0B9,$2691A9,$2FCBDD,$30DCEB,$0E394F,$19637A,$2494AC,$1A6683,$1B607A,$1A5A72,$2A6578,$254F64,$081D38,$193C4E,$327280,$1F5062,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$2AA0AB,$2EE2EA,$33FCFF,$27ACBF,$2BD0DC,$32FFFF,$23B1BA,$0C404E,$31F0F9,$106685,$21A6BB,$29BFCD,$22A8B8,$20A0B1,$000000,$000000,$090411,$020011,$00000B,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$13596A,$0C2034,$27C4CC,$2EE4E9,$0C4C5D,$22A2B0,$32C7D1,$135C6D,$1D9096,$20A0A6,$011421,$188089,$000000,$000000,$000000,$000000,$000000,$000000,$000010,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$242134,$061C2B,$000000,$0B080C,$3D4A56,$222232,$000006,$030D0D,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$303144,$000007,$000000,$0A0C26,$0E0E1C,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$03051E,$000005,$171826,$01010B,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$17171F,$191B30,$000002,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$212237,$0F1024,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000012,$000012,$000015,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000
  Data.l $000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000,$000000
EndDataSection
cherchez bien au milieu de votre écran quant vous exécuterez ce code, car c'est dure distinguer :lol:
Dernière modification par Fortix le jeu. 04/avr./2013 16:43, modifié 1 fois.
Avatar de l’utilisateur
MetalOS
Messages : 1498
Inscription : mar. 20/juin/2006 22:17
Localisation : Lorraine
Contact :

Re: PureVisionXP ???????

Message par MetalOS »

Merci pour la source Fortix ;-)
Avatar de l’utilisateur
Fortix
Messages : 559
Inscription : mar. 30/mai/2006 17:03

Re: PureVisionXP ???????

Message par Fortix »

de rien :D

j'ai effectué une petite correction au passage :lol: (dimension de l'image 0, 128pix->32pix)
c'était trois fois rien :D
Répondre