Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: Cykadelyxx
  • Order by date
  1. Cykadelyxx

    help with random lines in program

    shanley06 that will not work. the algorithm cannot know if there is a line passing between the two points that does not touch the endpoints. it only successfully tests for overlapping segments on a single horizontal or vertical line, one or the other and not both.
  2. Cykadelyxx

    help with random lines in program

    ...Private Function GetNextPoint() As POINTAPI Dim X1%, X2%, Y1%, Y2% With LineInterpolation X1 = 0 Y1 = -.CurrentPoint X2 = Cos(.Angle) * X1 - Sin(.Angle) * Y1 Y2 = Sin(.Angle) * X1 + Cos(.Angle) * Y1 GetNextPoint.X = X2 + .Origin.X GetNextPoint.Y = Y2 + .Origin.Y .CurrentPoint...
  3. Cykadelyxx

    Padding A String With Zeroes

    n$ = STRING$(6-LEN(n$), "0") + n$ or num$ = STRING$(6, "0") MID$(NUM$, 6 - LEN(n$) + 1, LEN(n$)) = n$ MID$ allows you to set string characters or read certain characters. MID$(String, StartIndex, NumChars) it can be used as an assignment or as a value returning function...
  4. Cykadelyxx

    Sorting an array

    ...a selection sort invented over a half century ago which has an algorithmic complexity of n^2, quicksort is a very good algorithm because it is n*log n .... so the difference is major for large arrays... for an of 1024 quicksort needs 10000 iterations where yours needs over a million. yes it...
  5. Cykadelyxx

    Btibltting

    umm, I am working on a project that uses TransparentBlt and I noticed that the autosize property IS set to True on both pictures. I must have been mistaken before when I associated my problem with the Autosize property. Sorry to send you on a wild goose chase. I haven't had any other problems...
  6. Cykadelyxx

    Btibltting

    For some reason TransparentBlt does not work if the source picture(haven't checked if the same is true for the dest) has the AutoSize property set to True on XP. I can't even guess why. Maybe this is your problem. I don't see anything else that could be an issue. They do recommend a DoEvents...
  7. Cykadelyxx

    Rounding of Numbers in VB

    ...is what i mean. Private Sub Command1_Click() Dim Xin As Double, Xout As Double, e As Double, R As Double Xin = 210034 e = 1 Xout = Xin Do Xout = Xout / (10 ^ e) R = Round(Xout - Int(Xout)) Xout = (Int(Xout) * 10 ^ e) + ((10 ^ R) * R) e=e+1 Loop Until Xout Mod 10 = 0 Me.Print Xout...
  8. Cykadelyxx

    Rounding of Numbers in VB

    and Xout = Xin before the Do... Ok, I'm done here.
  9. Cykadelyxx

    Rounding of Numbers in VB

    whoops.. got to have e=e+1 before the Loop Until...
  10. Cykadelyxx

    Rounding of Numbers in VB

    ...answer your question. Good Luck. Private Sub Command1_Click() Dim Xin As Double, Xout As Double, e As Double, R As Double Xin = 210034 e = 1 Do Xout = Xin / (10 ^ e) R = Round(Xout - Int(Xout)) Xout = (Int(Xout) * 10 ^ e) + ((10 ^ R) * R) Loop Until Xout Mod 10 = 0 Me.Print Xout...
  11. Cykadelyxx

    Btibltting

    haven't had any trouble with bitblt on XP. maybe if you post the part of your code where you set up your DCs and handles and where you call bitblt we can check if there is something else that could be a potential problem on XP...
  12. Cykadelyxx

    String filtering

    ...As Byte Dim sDex As Long Dim tmpDex As Long Dim tClock As Double 'make a random string For sDex = 1 To 10000 StrChunk.Bytes(i) = Int(Rnd * 255) Next 'add 2500 pounds For sDex = 1 To 2500 StrChunk.Bytes(Int(Rnd * 10000)) = Asc("#") Next OmitChar = Asc("#") 'time...
  13. Cykadelyxx

    PICTURE BOX AND FLICKERING IMAGES

    I think there should be a relatively easy solution to this. If you only have this problem when you click on a textbox then Windows may be redrawing the window when it doesn't need to. Theres lots of ways to minimize the amount of drawing you need to do to improve performance. Maybe you could...
  14. Cykadelyxx

    How To... Access the memory block of a PictureBox...?

    ...As Double, color As Byte Dim mx As Integer, my As Integer Dim exitflag As Boolean Dim dx As Double, dy As Double, dz As Double Sub DrawFrame() '*********************************** ' Setup the bitmaps so we can ' get to their memory '*********************************** ' these are used to...
  15. Cykadelyxx

    How to Initiate Run Dialog through link etc...

    If you can't find a standalone then runs it there may not be one. I'm not sure. But it's easy to call the SHRunDialog function to do it. If you have VB you can follow the link below(go to the example code), paste the code in a project, set the Form's Visible property to False, Place the...
  16. Cykadelyxx

    Runtime Picturebox Paste

    Set MyPicture.Picture = Clipboard.GetData when you catch ^V
  17. Cykadelyxx

    Prevent mousemove Focus on my app

    I find SetCapture is very useful for a lot of things dealing with mousemoves. When you shell to another app you could SetCapture SomeInVisibleObject.Hwnd, so that object would suck up all the mousemove events over your form. Seems to me that using this along with some simple logic would solve...
  18. Cykadelyxx

    Reading another process's memory

    Sweet! thanks logiclrd. I can't wait to get a chance to play around with this. I'm sure crackers and the like would be interested in this kind of thing but I hope it will have practical uses too, like finders pointers to values so you can link two applications from different vendors, and maybe...
  19. Cykadelyxx

    window region

    hehe. That's a good idea. I can see that being a popular time killer in the workplace. You have a lot of options for the objective of the game as well. Maybe have a pong like rectangle that could knock the bubble back to the thrower really fast, and if it goes past your screen to the next...
  20. Cykadelyxx

    window region

    Nice job, remedy! You should put that up on downloads as a stress reliever when you get the bugs worked out. "My mini piano" got something like a 300k+ downloads for crying out loud. The oddities were quite pronounced on my Celeron 400 with a Voodoo3. The biggest problem is you can see...

Part and Inventory Search

Back
Top