Search:
Type: Posts; User: JohnTurnbull
Search:
Search took 0.04 seconds.
-
If your app uses graphic files in its user interface and those graphics are shipped in a folder in its program folder and you find the app's program folder using App.path The only way to test the use...
-
Thanks to those who answered. After turning off UAC and still not being able to replace these files I've decided it really isn't worth the hassle. I'll just have to live with the old versions in the...
-
Sorry if I didn't make myself clear. This isn't user data. I keep that in \users\UserName\appdata\roaming where it should be. These are support files that ship with the program. I have been shipping...
-
Using VB6 installed in C:\Program Files\Microsoft Visual Studio\VB98 under Windows 10.
My App has some data files which ship in a sub folder of the Program folder. In order to access this in the...
-
-
-
Faulting application name: vb6.exe, version: 6.0.81.76, time stamp: 0x3592011f
Faulting module name: VBA6.dll, version: 6.0.0.9782, time stamp: 0x403ad081
Exception code: 0xc0000027
Fault offset:...
-
EditClip is a vb6 form. I have the source code. I don't use subclassing but it does have Krool's replacement Textboxes so they might. It closes with Unload EditClip. Setting each instance to nothing...
-
Thank you for your reply and sorry I took so long to answer. It doesn't cure the problem and there is no obvious "Relevant code" to post. Before OpenTed is run (Your version or mine), the program...
-
Hi folks,
Ted (EditClip) is a text editor.
I declare it..
Global Ted() As New EditClip
ReDim Ted(0 To 9) As New EditClip
Unload EditClip
Set EditClip = Nothing
-
Function MyPC$(Inn$)
Dim xx&, Tr$, Txt$, Strt&, Tr2$, Bad$, Tr3$
'--------------------
Txt = Inn
Txt = StrConv(Txt, vbProperCase)
'---------------O'Neal Etc------------
Strt = 1
Do
xx =...
-
Having just come across this problem and seeing that dilitante was kind enough to point out the solution...
"If your program had a proper manifest marking it as non-legacy then attempting this...
-
Having just come across this problem and seeing that dilitante was kind enough to point out the solution...
"If your program had a proper manifest marking it as non-legacy then attempting this...
-
FAB!
Again many thanks
John
-
Thank you very much Chris!
-
Thanks Chris. I know it can be done with Keybd_event and I will probably end up going back to it. I' would still prefer to get it working with SendInput, a, because, like you, I have a whole setup to...
-
I think I may have gone about this the wrong way. I will re-phrase my question....
Could someone provide me with VB6 code to simulate pressing the left windows logo key using SendInput?
-
1. My bad - I have changed it.
2. Obviously not as the code has been in use for almost 20 years!
-
There are no permissions problems. All other keystrokes work. 91 (the left windows key) is the only one that doesn't
-
There are no permissions problems. All other keystrokes work. 91 (the left windows key) is the only one that doesn't.
-
Hi,
Trying to simulate the Windows logo key using Sendinput and getting nowhere! Any help appreciated....
Before someone suggests sending Ctrl+Esc instead, that's no good to me. I need to send...
-
Ah!
The older I get, the dumber I get!
Thank you both.
-
Well I downloaded the latest version and still...
xx = SendMessage(Text1.hWnd, EM_LINESCROLL, 0, 1)
scrolls to the end, not just one line!
There's no panic as I got round the problem by...
-
Thank you for your quick reply.
I will download the latest version.
.SrollToLine doesn't seve my purpose
-
Hi Krool,
I have your TextboxW as Text1. When I call...
xx = SendMessage(Text1.hWnd, EM_LINESCROLL, 0, 1)
The textbox scrolls to the end, not just one line!
I stepped through your code...
-
-
Hi All,
In a multi - line text box which has scrolled. (i.e. the first line is not shown) Is there a way to find the number of the first line that does show?
-
Not using LB_SETTABSTOPS (= &H192)
Using EM_SETTABSTOPS (= 203)
-
I added this sub to your ComCtlsDemo project....
Sub SetTabStops(TB As Object)
Dim TabStops() As Long
Dim xx&, yy&
Dim Ret As Long
Dim Stops&
'-----------------------
On Error GoTo Bad
-
Just wondering. Does the latest version handle WM_ Settabstops for TextboxW ?
-
Hi
Bit late but if anybody has the same problem and ends up here, the answer is that neither the VB nor API clearings work if they are called when, by chance, some other program has the clipboard...
-
Not really a VB question but people are so helpful here and asking in MS forums is like banging your head on a brick wall!
There are two versions of onedrive.
I have the version with filename...
-
Thank you, thank you, thank you!
-
Hi,
I need to find the path to a users Onedrive executable. Microsoft being Microsoft this can either be OneDrive.exe or GROOVE.EXE. I can figure out which it is and get its PID. Then I'm stuck!
...
-
Problem solved!
If you use SetProcessDpiAwareness& to 2 to do your own scalling, you must do it before you call EnumDisplayMonitors.
Either way round works in the IDE but not compiled.
Thank...
-
Admin / non admin makes no difference. The only difference is between interpreted and compiled. Code is way to extensive. Sorry.
-
I have a program which runs perfectly in the IDE but not when compiled. I am therefore asking for any known differences in behaviour.
I know about making a window “on top” works in form load when...
-
If anybody has done this from VB6, I would really appreciate the code!
-
Anybody know a simple way to check if onedrive is synchronized?
-
If I don't get a top left on a monitor I then go for the nearest as a second resort........
Function GetMonNo&(Frm As Form)
Dim xx&, yy&, RetVal&
'---------
RetVal = -1
'--------Try top...
|
Click Here to Expand Forum to Full Width
|