# Search:

Type: Posts; User: joaquim

Page 1 of 13 1

1. ## Thread: [RESOLVED] how can i walk throw the line?

by joaquim
Replies
6
Views
852

### Re: how can i walk throw the line?

i found why i get that empty pixels... have to do with camera size... thank you so much for all
2. ## Thread: [RESOLVED] how can i walk throw the line?

by joaquim
Replies
6
Views
852

### Re: how can i walk throw the line?

- for get the line points is from up to bottom
- for draw the image is bottom to up
3. ## Thread: [RESOLVED] how can i walk throw the line?

by joaquim
Replies
6
Views
852

### Re: how can i walk throw the line?

i'm testing more these function, but i don't get some points and i don't know why :(

'if the line don't use Z, the Z value must be zero
Public Function GetLinePoints(ByRef Origin As Position3D,...
4. ## Thread: [RESOLVED] VB6: how get RGB from ARGB color?

by joaquim
Replies
5
Views
221

### Re: VB6: how get RGB from ARGB color?

thank you so much for all.. i continue had some bad colors with some images... but, for now, i can draw an image on 3D plane.... i must use DIB's for speed and more ;)
now i must fix another...
5. ## Thread: [RESOLVED] VB6: how get RGB from ARGB color?

by joaquim
Replies
5
Views
221

### Re: VB6: how get RGB from ARGB color?

i found these code:

GdipBitmapGetPixel hBitmap, X, Y, color
r = (color And &HFF)
g = ((color \ &H100) And &HFF)
b = ((color \ &H10000) And &HFF)
...
6. ## Thread: [RESOLVED] VB6: how get RGB from ARGB color?

by joaquim
Replies
5
Views
221

### Re: VB6: how get RGB from ARGB color?

see these test code(ok combined GDIPLUS with GDI, but it's only a test):

Dim color As Long
GdipBitmapGetPixel hBitmap, X, Y, color
If (color = CLR_INVALID) Then Exit For...
7. ## Thread: [RESOLVED] VB6: how get RGB from ARGB color?

by joaquim
Replies
5
Views
221

### [RESOLVED] VB6: how get RGB from ARGB color?

i need get Red, Green and Blue from ARGB... how can i do it?
8. ## Thread: VB6: how rotate an image 2D using 3D formulas?

by joaquim
Replies
1
Views
312

### Re: VB6: how rotate an image 2D using 3D formulas?

that's impossible rotate an image correctly.
so i had learned another way.
we can get the line points:

'if the line don't use Z, the Z value must be zero
Public Function GetLinePoints(ByRef...
9. ## Thread: how use array parameters?

by joaquim
Replies
0
Views
116

### how use array parameters?

heres a function for get line points:

Public Function GetLinePoints(Origin As Position3D, Destiny As Position3D) As Position3D()
Dim Steps As Double
Dim Points() As Position3D

...
10. ## Thread: VB6: how rotate an image 2D using 3D formulas?

by joaquim
Replies
1
Views
312

### VB6: how rotate an image 2D using 3D formulas?

using an image, we can rotate the pixel using 3D math:

'Module1:
Option Explicit

Type POINTL
X As Long
Y As Long
End Type
11. ## Thread: how avoid the overflow error?

by joaquim
Replies
2
Views
207

### Re: how avoid the overflow error?

'X axis (Pitch)
PosY = PosY * Cos(AngleX) - PosZ * Sin(AngleX)
PosZ = PosY * Sin(AngleX) + PosZ * Cos(AngleX)
the 'PosZ': "-1, #INF"....
i get very big numbers... but don't make sence...
12. ## Thread: how avoid the overflow error?

by joaquim
Replies
2
Views
207

### how avoid the overflow error?

i did the RotationImage():

'Rotate an image:
Public Sub RotationImage(ByRef HDCDestination As Long, ByRef HDCSource As Long, ByVal AngleX As Double, ByVal AngleY As Double, ByVal AngleZ As...
13. ## Thread: VB6: GDIPLUS - how change pixels colors on a faster way

by joaquim
Replies
26
Views
1,199

### Re: VB6: GDIPLUS - how change pixels colors on a faster way

now i can control it:

Private Sub TrapezoidBlt(ByVal PctTop As Long, ScanZ As Single, ByVal DestinationHDC As Long, PosX As Long, PosY As Long, ByVal TranspColor As Long)
Dim ScanLines As...
14. ## Thread: vb6: how use an user type parameter on a class function\sub?

by joaquim
Replies
23
Views
1,063

### Re: vb6: how use an user type parameter on a class function\sub?

heres the error message:
https://imgur.com/a/hOjFifj
15. ## Thread: VB6: GDIPLUS - how change pixels colors on a faster way

by joaquim
Replies
26
Views
1,199

### Re: VB6: GDIPLUS - how change pixels colors on a faster way

i can't control the draw position :(

Private Sub TrapezoidBltUpdate(ByVal PctTop As Long, ByRef pos As POINTAPI, ByVal zpos As Long, ByVal DestinationHDC As Long, ByVal TranspColor As Long)
...
16. ## Thread: vb6: how use an user type parameter on a class function\sub?

by joaquim
Replies
23
Views
1,063

### Re: vb6: how use an user type parameter on a class function\sub?

DataMiser: the error message is on Compilation step.
17. ## Thread: vb6: how use an user type parameter on a class function\sub?

by joaquim
Replies
23
Views
1,063

### Re: vb6: how use an user type parameter on a class function\sub?

on a module:

Option Explicit

Public Declare Function GetLastError Lib "kernel32" () As Long
Public Declare Function GetActiveWindow Lib "user32" () As Long

Public Declare Function ArrPtr...
18. ## Thread: VB6: GDIPLUS - how change pixels colors on a faster way

by joaquim
Replies
26
Views
1,199

### Re: VB6: GDIPLUS - how change pixels colors on a faster way

mms_: using Matrix can we rotate an image?
the GDIPLUS only rotate the Y or X or both?
the Z angle can be converted or added to X and Y angle?
19. ## Thread: VB6: GDIPLUS - how change pixels colors on a faster way

by joaquim
Replies
26
Views
1,199

### Re: VB6: GDIPLUS - how change pixels colors on a faster way

my best thot was rotation the image using DIB's(or the GDIPLUS) on a pixel way.. they are faster...
the image have Z=0... so from here i can rotate the image... but i can't get the angle by a...
20. ## Thread: vb6: how use an user type parameter on a class function\sub?

by joaquim
Replies
23
Views
1,063

### Re: vb6: how use an user type parameter on a class function\sub?

i never did a DLL\lib.. but i can learn it ;)
21. ## Thread: vb6: how use an user type parameter on a class function\sub?

by joaquim
Replies
23
Views
1,063

### Re: vb6: how use an user type parameter on a class function\sub?

dilettante: imagine that i have 10 types, so i need create 10 class's :(
so the best is create all types\structures and declare all GDIPLUS functions\sub's on a module and then i can use it on a...
22. ## Thread: vb6: how use an user type parameter on a class function\sub?

by joaquim
Replies
23
Views
1,063

### Re: vb6: how use an user type parameter on a class function\sub?

wqweto: so everytime that i share the class, i must share the module file too?
why i can't create a type, inside the class, and use it on class?
23. ## Thread: VB6: GDIPLUS - how change pixels colors on a faster way

by joaquim
Replies
26
Views
1,199

### Re: VB6: GDIPLUS - how change pixels colors on a faster way

dilettante: correct me 1 thing: the GDIPLUS rotation can use Z and Y?
LaVolpe: thank you.. now i get it.. thank you
24. ## Thread: VB6: GDIPLUS - how change pixels colors on a faster way

by joaquim
Replies
26
Views
1,199

### Re: VB6: GDIPLUS - how change pixels colors on a faster way

"ColorMap() is an array of pairs of ARGB colors, each pair being "old color" and "new color" to substitute."
but i don't know how works :(
"Not sure why you want to pixel-fiddle. I thought you...
25. ## Thread: VB6: GDIPLUS - how change pixels colors on a faster way

by joaquim
Replies
26
Views
1,199

### Re: VB6: GDIPLUS - how change pixels colors on a faster way

how works 'ColorMap'(i don't know that hexadecimal values)?
ok.. the AlphaPic is a class(not tested the project)...
i need ask more 1 thing: the GdipBitmapGetPixel() and GdipBitmapSetPixel(), must...
26. ## Thread: VB6: GDIPLUS - how change pixels colors on a faster way

by joaquim
Replies
26
Views
1,199

### VB6: GDIPLUS - how change pixels colors on a faster way

using GDIPLUS, how can i change the pixel colors(or swap colors) on a faster way?
27. ## Thread: vb6: how use an user type parameter on a class function\sub?

by joaquim
Replies
23
Views
1,063

### vb6: how use an user type parameter on a class function\sub?

Private Type POINTL
X As Long
Y As Long
End Type

Friend Sub DrawImage(DestinationHDC As Long, ByRef Position As POINTL)
GdipDrawImage hGraphics, hBitmap, Position.X, Position.Y...
28. ## Thread: how can i get the GDI+ declaration functions\types?

by joaquim
Replies
35
Views
1,043

### Re: how can i get the GDI+ declaration functions\types?

the trapezoidBlt() draws from X zero(just using the form entire size).... can i start on X=100 and Y=100?
the PosY = PctTop + Y? and PosX = Width + Y?
29. ## Thread: how can i get the GDI+ declaration functions\types?

by joaquim
Replies
35
Views
1,043

### Re: how can i get the GDI+ declaration functions\types?

ok.. i need understand: what is the difference between trapezoid and parallelogram shapes?
PctTop is what? the start position? i need understand the start positions and their width's for i use the ...
30. ## Thread: how can i get the GDI+ declaration functions\types?

by joaquim
Replies
35
Views
1,043

### Re: how can i get the GDI+ declaration functions\types?

the points() are the filled shaped coordinates
31. ## Thread: how can i get the GDI+ declaration functions\types?

by joaquim
Replies
35
Views
1,043

### Re: how can i get the GDI+ declaration functions\types?

i found the big problem: everyone can make their own types\enums\consts names... and if i'm not prepared for it, i can make some problems.
is there anyway for we detect these type of errors?

now...
32. ## Thread: how can i get the GDI+ declaration functions\types?

by joaquim
Replies
35
Views
1,043

### Re: how can i get the GDI+ declaration functions\types?

wow.. the DrawImage():

Private Function DrawImage(FileName As String, hDC As Long, x As Long, y As Long) As Boolean
On Error Resume Next
Dim GDIsi As GDIPlusStartupInput, gToken As Long,...
33. ## Thread: how can i get the GDI+ declaration functions\types?

by joaquim
Replies
35
Views
1,043

### Re: how can i get the GDI+ declaration functions\types?

"OutOfMemory : Indicates that the operating system is out of memory and could not allocate memory to process the function call"
34. ## Thread: how can i get the GDI+ declaration functions\types?

by joaquim
Replies
35
Views
1,043

### Re: how can i get the GDI+ declaration functions\types?

status = GdipLoadImageFromFile(StrPtr(filename), hBitmap)
MsgBox CStr(status)
i get '3'
35. ## Thread: how can i get the GDI+ declaration functions\types?

by joaquim
Replies
35
Views
1,043

### Re: how can i get the GDI+ declaration functions\types?

On Error GoTo 0
Call GdipCreateFromHDC(Me.hdc, hGraphics)
If hGraphics Then
If hBitmap Then
MsgBox "hey"...
36. ## Thread: how can i get the GDI+ declaration functions\types?

by joaquim
Replies
35
Views
1,043

### Re: how can i get the GDI+ declaration functions\types?

Private Sub DrawPlane(Position As Position3D, size As Size3D, Rotation As Angle3D, WorldSize As Size3D)
Dim Points(4) As POINTAPI
Dim NewPoint As POINTAPI
Dim NewPosition3D(4) As...
37. ## Thread: how can i get the GDI+ declaration functions\types?

by joaquim
Replies
35
Views
1,043

### Re: how can i get the GDI+ declaration functions\types?

passel that's why i'm using the GDI+, but seems that you have right: i don't understand what i'm missing... sorry.
i did i new function that works draw an image:

Private Function...
38. ## Thread: how can i get the GDI+ declaration functions\types?

by joaquim
Replies
35
Views
1,043

### Re: how can i get the GDI+ declaration functions\types?

thank you so much for all
now how can i learn using that functions?
i have a C\C++ tutorial\pdf from MSDN, but they have some differences from C\C++ to VB6.
i need understand, for now, the...
39. ## Thread: how can i get the GDI+ declaration functions\types?

by joaquim
Replies
35
Views
1,043

### how can i get the GDI+ declaration functions\types?

how can i get the GDI+ declaration functions\types?
i have find these module: https://github.com/tannerhelland/pd2D/blob/master/src/GDIPlus.bas
but some types are missed :(
for now, i only need...
40. ## Thread: [VB6] GDI+ Usage & Samples

by joaquim
Replies
109
Views
96,780

### Re: [VB6] GDI+ Usage & Samples

LaVolpe where can i see the GDIPlus functions declarations for VB6?
Results 1 to 40 of 500
Page 1 of 13 1

Click Here to Expand Forum to Full Width