ATTENTION: You are viewing a page formatted for mobile devices; to view the full web page, click HERE.

DonationCoder.com Software > Finished Programs

DONE: Make window transparent when moving it.

<< < (2/4) > >>

Blaster:
I wrote something that can help you if you are moving Forms by clicking on it, not the captionBar...
if this can help you...


--- ---bool draging=false;
bool a=false;

void MoveForm()
{
ReleaseCapture();
SNDMSG( Form1->Handle, WM_SYSCOMMAND, SC_MOVE + HTCAPTION, 0 );
}


__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,
  TShiftState Shift, int X, int Y)
{
draging=true;
a=true;


}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift, int X,
  int Y)
{
if(a)
{
if(draging)
{
Form1->AlphaBlendValue=127;
MoveForm();
Form1->AlphaBlendValue=255;
}
}
a=false;


}

This, off course, could be written better, but i'm in a hurry... :-)

jgpaiva:
Here's your solution!

TransparentMove v1 created 30-09-2006:
When the user presses ctrl and drags the window, it becomes trasnparent and is moved.

--- End quote ---
[Forum Topic][.ahk Version][.exe Version]

Blaster:
I don't understand, do you need this for your app, or for any window in your OS...??

jgpaiva:
I don't understand, do you need this for your app, or for any window in your OS...??
-Blaster (September 30, 2006, 12:28 PM)
--- End quote ---
Notice that the solution i presented above is a complete program. You download the ".exe" version, execute it and it'll display an icon on the tray (which should be in the right corner of the screen). To quit it, just right-click the icon and select "exit".

Blaster:
No, no, jgpaiva, I downloaded your app and it's ok...
 i asked cheeaun this because he said:

When moving a window, (Click + Drag), the window becomes semi-transparent. That's all.

Can be done? 
--- End quote ---


Cheeaun, do you need this in your app, or do you want your OS to behave like this...??


Navigation

[0] Message Index

[#] Next page

[*] Previous page

Go to full version