Fixed Desktop
i installed outlook and saw these shortcut bar at the righit site.
if i open and maximize any window now it never overlays the bar.
is there any way to do this in VB?
View Complete Forum Thread with Replies
See Related Forum Messages: Follow the Links Below to View Complete Thread
Desktop Context Menu {hide Desktop Icons In WinXP}
my problem started when i found a submenu item for the desktop context menu (WinXP) that allowed me to hide my icons. i liked the look of my desktop like that, what i would really like is a button on my quicklink bar that could turn the icons on and off. as far as i could tell there is no way to do it with windows (ie. .scf script file like the "Show Desktop" quicklink button). so i opened up VB in hopes that i could use the windows API to deliver a click event to that menu item, so the icons would disappear with out actually displaying the menu for the user to see.
i found a code snippet on the net that showed how to hide the desktop window... causing the icons to disappear... but at the same time causes the desktop context menu to not function either. i looked over all the windows messages that i could send to a listview window in hopes that one of them would allow me to hide the icons... each solution seemed more and more complex.
is there a way to activate an menu item on the desktop context menu with out it being displayed?
Can This Be Fixed?
I have created a program asking the user at the opening of the file if he would like a row inserted into the spreadsheet. The spreadsheet is over 400 rows long.
When the input box is displayed there is also the hour glass, preventing the user to scroll through the page to see where a row should be inserted.
Can the hour glass be prevented?
Any help would be appreciated.
Thanks.
This-that (fixed)
ok, I want to do a conversion like the following...
convert this...
HTTP://webpage LOGiN:login PASSWoRD:pass
into
this...
HTTP://login:pass@webpage
How should the code look like???
Almost Fixed I Think!
heres my distance program, having some problems however. would anyone be able to try and figure out what the problem is? im at a loose end after trying to fix it for days...
cheers.
Now That's Fixed...
my dirlistbox is controlled by a drivelistbox,
for example,when i select A: and no disk is present,
an error occurs
How do i make my own error handlers?
so that if no disk is present,my own error warning
will b shown?
thanx in advance
Fixed It
Nevermind, i fixed the glitch. Not sure how though.... but it works now.
All Fixed
thanks
Edited by - jjoseph on 2/28/2008 9:56:32 PM
Fixed Col In Msflexgrid
Hi,
I have a msflexgrid with fixed col that display fixed col in left,
please say me how I can display fixed col in right ?
Thanks,
Mansoor Abdi,
Fixed Row On MSFlexGrid
Alright, I have this code which I'm just playing around with, and was trying to set the text on the first row (Fixed) on an MSFlexGrid control, and this is the only way I could manage to do it... It works, but there has to be a better way. Any thoughts?
Code:
MSFlexGrid1.Rows = 0
Let entry = "I'm a fixed row" & Chr(9) & "Test2" & Chr(9) & "Test3"
MSFlexGrid1.AddItem entry
MSFlexGrid1.Rows = 2
MSFlexGrid1.FixedRows = 1
MSFlexGrid1.Rows = 1
Fixed Row In MSFlexgrid
G'day,
Just a quick question - is it possible to change the height of the fixed row at the top of the MSFlexgrid without changing height of all the other rows of the grid?
I have tried the Wordwrap (True) but the row does not stretch to allow for the text in the "Heading" row.
I have set the AllowUserResizing to 2 - flexResizeRows but I don't want the User to have to stretch the row down to find out what are the column headings for the data.
Since the data is likely to be only 1 to 3 numbers I do not need to have the column headings to be of any great width either.
Hope that you can understand what it is I'm trying to do.
Thanks (in advance)
takowai
MouseRow Fixed
Is there a way to get the MouseRow value at the IMMEDIATE moment where the user clicks in a MSFlexGrid. Because right now, even if I get the MouseRow Property in the MouseDown Event of my grid, if the user is quick enough to move his mouse a couple of inches, I am getting the value of another row...
Fixed Row In MSFlexGrid?
HI!
Jow can I tell if the user clicked on a fixed row in MSFlexGrid. I try to get the number of row with MSFlexGrid.Row, but it returns 1 instead of 0. It works fine for non-fixed rows - they run from 1 to .Rows - 1
Bostjan
Fixed Windows
i wondered if there is a way to make a toolbar such as the office-toolbar. when you open any window and maximize it, the toolbar should still stay visible and not overlay the window.
is there any way to do this in VB?
i mean the bar should not stay on top, the window should only not overlay it.
And this is NOT the same thread as http://www.xtremevbtalk.com/show...p?t=106346this
this is about always on top
Fixed Image In CR 11
I'm using vb6 and CR 11. How to manage Image in CR? I inserted an image in the Report Header (ReportHeader Section1), then when I run it, the image size is not the same as during the design time. How it could be? I want a fixed size. The size of the image during design time must be the same as during run time. Do you have any solution to it? Thanks in advance : )
Need A Small Bug Fixed
Code:
Private Sub TT_item3_Click()
Load DataEnvironment1
DataEnvironment1.Command1_Grouping "1"
If rpt_tt_all.Visible = False Then
rpt_tt_all.Show
End If
End Sub
Private Sub TT_item4_Click()
Load DataEnvironment1
DataEnvironment1.Command1_Grouping "2"
If rpt_tt_all.Visible = False Then
rpt_tt_all.Show
End If
End Sub
On runtime, when i view report from item3_click it opens; and than when i close the report and try to check item4_click report it gives an error at DataEnvironment1.Command1_Grouping "2" that its already open; & vice versa.
Whats the main reason? and how can i fix it?
thanks.
Fixed Col In MSFlexgrid
Hi
I have an MSFlexgrid that contains 1 fixed column and 1 fixed row.If the users clicks on any cell inside this MSFlexgrid,form1 is shown.But If the user clicks on any cells inside the fixed column or the fixed row nothing is done.
how can I do it?
thanks
Fixed Dialog
hey. my form is set to 2 - Sizeble, and the MinButton is True, Max Button is false..how do i stop it from being resized? and still having Minimize?
Screensize How To Set It Fixed.
Hi all, i want to have my programma to be opened in 800x600 fixed.
It may not me smaller or bigger it must be 800x600.
How can i do that?
thanks again.
Youre the best (this forum).
Walter.
App.path Help (FIXED IT MYSELF)
i am using this code to open the text file that is selected in the combo box
VB Code:
Private Sub ListFiles(strPath As String, Optional Extention As String) Dim File As String If Right$(strPath, 1) <> "" Then strPath = strPath & "" If Trim$(Extention) = "" Then Extention = "*.*" ElseIf Left$(Extention, 2) <> "*." Then Extention = "*." & Extention End If File = Dir$(strPath & Extention) Do While Len(File) Combo1.AddItem File File = Dir$ LoopEnd Sub Private Sub Combo1_Click()Dim codeBankcodeBank = combo1.text rtbCode.LoadFile (App.Path & codeBank)End Sub Private Sub Form_Load()ListFiles App.Path, "txt" End Sub
to me this should work but i get a file acces error! if i make the rtbCOde open the file using the whole directory it wokrs, they are in the same directory (the program and the files0 so i dont know whats wrong!
Public Sub [Fixed]
Ok, here is a problem that I am having. I am using BitBlt and am trying to make a public sub so that it is easier to use. I have in my module
Code:
Public Sub bdraw(TheForm, CutX, CutY, wWidth, hHeight, Pic, LLeft, TTop, vbSrcPaintForOriginalvbSrcAndForMaskvbSrcCopyToCopy)
BitBlt TheForm.hDC, CutX, CutY, wWidth, hHeight, Pic.hDC, LLeft, TTop, vbSrcPaintForOriginalvbSrcAndForMaskvbSrcCopyToCopy
End Sub
So that when I type bdraw it is supposed to call those functions and in brackets I insert the necessary code. To call this I have in one of my forms
Code:
Private Sub Command1_Click()
bdraw(frmJoust, 59, 0, 16, 23, picPlayers, 50, 50, vbSrcPaint)
End Sub
If anyone could help me out that would be greatly appreciated. If you need to see the code I could zip it and post it. Thanks!
*** Does This Error Mean? (FIXED)
New to the forum guys and gals. I am in technical school, not studying programming but we have to take a beginners course. I am in the networking program but I find program interesting and fun when you make it work.
In my project i have 1 class that will connect to an Access Db for the word i input and come pack with its meaning (next column). When I debug it stops when it is trying to connect. I looked up ISAM on google, and it has something to do with indexing or accessing Dbs. However my professor who codes for major companies was clueless to this and told me "i will look into it". However I want my program to work now.
I thought this was just my computer, so I ran the program on a different one, and got the same error. Now Im thinking its something in my project... What would cause this?
Need Code Fixed!!
I'm working on a pizza order form..Can somone fix my coding so that the numbers add and subtract correctly..Thanks!!!! the Form is attached
Last Non-fixed Row Cannot Be Removed ?
I am using a MSFlexGrid contol .
I have this statment:
MSFlexGrid1.Remove(rownumber)
I can remove all rows except when there is only 1 more row left and it give "last non-fixed row cannot be removed"
Why is that?
Is the flexgrid control designed that way or is it a setting?
Thanks.
Commdialog Fixed Dir
Hi, i can set the initDIR property of the but is there a way to limit the user to that directory , meaning he cannot move around in either up or down directions.
Code Fixed!!! Well, ALMOST.
Hey, I wrote code to convert seconds to mins and seconds (mm:ss ) and it works perfectly except for one minor problem.
Song lengths that are like 4:59 display just fine, but song lengths like 3:07 dis play like this: 3:7
I'm sure there must be a simple way to fix this bug, so it read 3:07.
Any help with this is appreciated. I'm one step away now!
Fixed Fonts
How can I get a list of fixed fonts (all fonts with the same size)?
The only fixed font that I am aware of today is Courier.
Thanks in advance.
Who Can Fixed This Code
i have an erro on this operation
dim pr as string
pr = inputbox("something")
if pr = "" then
exit sub
end if
datAccessData.Recordset.FindFirst "ProjectNo= " & pr & ""
if datAccessData.Recordset.NoMatch Then
msgbox" somthing"
end if
the error is : Data Type mismatch in criteria expression
Fixed Arrays
I am currently working on a project to store names within an array. My question is :
"Is a fixed array the same as an static variable array?"
Thanks in advance
Edited by - dunjamon on 3/14/2004 5:53:35 AM
(fixed) Form_keypress - Thanks
i want my app to register what key is been pressed at any given time while its running, i add the form_keypress(blah blah) sub and it never gets fired or triggered. i think the problem is that my form has heaps of elements on it. i dont know. so I opened a new project with just one form and 1 label and then it works fine.
how could i get my form to enter the form_keypress sub?
Signature -----------------------------------------------------------------------------------------------------Code:Private Sub Form_Load() 'Print to from, code my problems!
Form1.Print "CanT SleeP!..... MusT PrograM!!!" & vbCrLf & "I need coffee, WhErE iS mY CoFfEe?!"
End Sub 'All things come to and end
------------------------------------------------------------------------------------------------------------------
Edited by - coma on 10/27/2004 6:29:17 PM
MSFlexrid Fixed Row/col
I need to decide on the click event of a MSFlexGrid, if the user has clicked on a normal cell or on a fixed row/col. The row/col property returns 1 for both - the fixed row and the first data row.
Please help, urgent.
Narasimhan
Fixed Width Files
Hello All
I have a file that contains fixed width Fields
E.G.
2004120411:56Mansfield 01623 00.7812.20
So the fields would be:
Field 1: Date - 8 chars
Field 2: Time - 5 chars
Field 3: Destination - 27 chars (inc spaces)
Field 4: Telephone - 20 chars (inc spaces)
Field 5: Duration - 5 chars
Field 6: Cost - 5 chars
What i nned to do is load this file into Visual basic, add a user defined percentage to Duration and Cost and then output the File in the same format.
I can and have done it with a CSV file, but i am unsure with Fixed width files
Any help would be great, i don't even know where to start.
Dahquim
Mshflexgrid Fixed Row Multiline?
Is there a way to make the fixed row (title row) of my mshflexgrid multiline? I have column headers such as "MIN LEVEL" and I'd like MIN to be above and LEVEL below it...is this possible?
i.e. I want it to look like :
Code:
MIN | MAX
LEVEL | LEVEL
-------------------
instead of:
MIN LEVEL | MAX LEVEL
--------------------------
Fixed Form Position
Hi,
I want user not to be able to move the Form (make the Form position fixed) , how can I do that?
Thanks
FIXED Toolbarbutton Size?
I have a problem with my toolbarbuttonsize:
It's actually twofold:
1. I can't change it -I can set it to
tbrToolbar.buttonheight = 400
tbrToolbar.buttonwidth = 1000 (twips)
But when I start my program width and height are reset ro 540.3638 and 1260.3638 (twips -not sure if i have the decimals correct) And I can't find any option unlocking of setting in to manual.The AllowCustomize is set to true.
That is one -this wouldn;t have been a problem if my program didn't have to run under different OS-es -and consequently (due to obsolete machinery) at different resolutions. My program has to work under Win98 and under XP (mine = +SP5). I am desgining and writing on the XP PC. The lowest resolution is 800x600.
ON my PC -XP- I designed the toolbar to be wrapped into to 5 colums and 2 rows, each buttong having the size op 540x1260 (twips) approx.
This way I can obtain the 5 colums and 2 rows.
STRANGELY enough, when I start my program on a Win98 PC the toolbarbuttons height and width are no longer the 540x1260 but larger -not sure how much, but large enough to fit only 3 colums x 2 rows in my original design.
Of course, I know, something is automated and prevented from being set manually. My problem is: I can't find that option.
Can anybody explain why this change in size automaticallty occurs when changing OS-ses and what to to about it -and if that cannot be helped, how to set the toolbar button size from automatic to manual. I found the buttonheight and buttonwidth methods to the toolbar object, so I assume I can give these a value myself manually. All I need to know is how I can get VB to use these manual settings instead of being stubborn
and just do what I tell it to do
MSFlexGrid Fixed Columns
Hi.
I am using a MsFlexGrid to display information from a database. Now I was wondering if there Is a way to add data to the fixed rows so that they would act as a title for the column.
Rotate Around A Fixed Point
I hope you can help.
I have a polygon with a bmp image for texture which moves up and down the screen. I am also rotating the polygon.
The rotation always occurs at the centre of the polygon.
I need the centre of rotation always to be at the centre of the screen with a resolution of 800 x 600. The centre of rotation is always to be at 400 x 300 regardless of the vertical position of the polygon.
regards
GR4Jockey
Fixed Form Size???
I want to know if there is a way to fix both the form height and form width in an Access user form. The width property is the true size of the form. When AutoSize property is False, the form basically "explodes" and becomes huge with blank space on right and bottom of form. When AutoSize is true, it actually does work kindof correctly, but there's still about 1/2" of blank space on right and bottom for no reason at all (there are no controls or anything in this area). Is there a way to fix the width and height so this is not shown?
Fixed Report Footer
hi,
I have created a report in access 97 which is in the format of an Invoice. It has a report footer that contains the Total and remarks etc. How do ensure that the r eport footer will be printed at the bottom of the page even if there are only a few lines(table rows) in the report.
Currently , it places the report footer immidiately after the details part.
thanks
Fixed Time Reference
Does anyone know how to have a textbox caption display a fixed time reference, i.e. a specific time zone. I'm hoping there is a way to get my app to reference & display the times in different time zones without having to hit the Net or without doing calculations from the local system time. I want the app to be able to be used across different time zones without any user input. I'm hoping there is a way to reference the time zones that are available to the user when they are setting their local time zone. Any help with this would be greatly appreciated.
Fixed Width Fonts
Are there other than "Courier New" fixed width fonts? And if so, where would I find a list of those fonts?
TIA
Dick Deeds
MSFlexgrid Fixed Columns
I have a flexgrid with 5 columns. I want the first 3 to be fixed together with the 5th column. The 4th column is for user entry.
Is there any way to skip 4th column and fix the 5th?
MsgBox Problem (Fixed)
Just wanted to post this, even though it may be well known
This thread addressed the problem I was having with the form from which a message box was called would disappear. The fix was simple. Set BorderStyle to 1-FixedSingle, Since I don't want the user min/maxing the form this worked perfect.
Randomising A Fixed Set Of Values
I am having a bit of trouble - in my code at the form load i load in a set of values to be stored in a variable e.g.
Code:
Private Sub Select_Body_4()
Dim iCurrentStimulus As Integer
Dim TrialTypeChecker(1 To 32) As Integer
Dim iPickStim As Integer
Do
iPickStim = iPickStim + 1
Do
iCurrentStimulus = Int((32 - 1 + 1) * Rnd + 1)
Loop Until TrialTypeChecker(iCurrentStimulus) = 0 'loop until there are 20 cases filled in the checker array
TrialTypeChecker(iCurrentStimulus) = 1
iBody4(iPickStim) = iCurrentStimulus
Loop Until iPickStim = 4
End Sub
This picks 4 images from 32 possible ones and holds them in iBody4
Then later in the program i want to present them x number of times (in this example its until there have been 16 clicks of the mouse)
Code:
Private Sub Run_Body4()
Dim iRunLoop4 As Integer
Dim bMouseCountComplete As Boolean
Dim iElapsedTime As Integer
Dim iTypeBlock As Integer
bMouseCountComplete = False
iMouseCount = 0
Do
iRunLoop4 = iRunLoop4 + 1
For iRunLoop4 = 1 To 4
hrt_timer_start iFlowTimer
picture1.Picture = LoadPicture(sDirBody & Body(iBody4(iRunLoop4)))
DoEvents
Do
iElapsedTime = hrt_timer_current(iFlowTimer)
If iMouseCount >= 16 Then
bMouseCountComplete = True
Exit Do
ElseIf iElapsedTime >= iTimeFixation Then
Exit Do
End If
Loop
If bMouseCountComplete Then
'stop everything here
Exit Sub
End If
hrt_timer_stop iFlowTimer
hrt_timer_reset iFlowTimer
PictureFixation.Visible = False
picture1.Visible = True
DoEvents
hrt_timer_start iFlowTimer
Do
iElapsedTime = hrt_timer_current(iFlowTimer)
If iMouseCount >= 16 Then
bMouseCountComplete = True
Exit Do
ElseIf iElapsedTime >= iTimeImage Then
Exit Do
End If
Loop
If bMouseCountComplete Then
'stop everything here
Exit Sub
End If
hrt_timer_stop iFlowTimer
hrt_timer_reset iFlowTimer
picture1.Visible = False
PictureFixation.Visible = False
DoEvents
Next iRunLoop4
Loop
End Sub
Now at the moment this just presents them as follows 1234 1234 1234...etc but i want it to present them randomly in fours e.g. 1234 3214 1324 2143...etc but i cannot workout how
any help would be great
many thanks in advance
andy
|
TRACKER
