SAYFANIN SLAYT AÇILIŞI FADE/ PAGE SLİDESHOW
ON PRELOADsOS=String.Right(System.GetOSName(),2);
if (sOS == "XP" ) or (sOS == "00") or (sOS == "03") then
blnFade = true;
Opacity = 0;
handle = Application.GetWndHandle();
result = DLL.CallFunction("AutoPlay\\Docs\\wTrans.dll",
"SetWindowTransparency", handle..","..Opacity, DLL_RETURN_TYPE_LONG,
DLL_CALL_STDCALL)
else
blnFade = false;
end
ON SHOWif blnFade then
Page.StartTimer(50)
else
result = Dialog.Message("OS not Supported", "This DLL will only work on
Win2000 and up.", MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1)
end
ON TİMERif blnFade then
Opacity = Opacity + 5
if (Opacity < 255) then
long = DLL.CallFunction("AutoPlay\\Docs\\wTrans.dll",
"SetWindowTransparency", handle..","..Opacity, DLL_RETURN_TYPE_LONG,
DLL_CALL_STDCALL)
end
end
*****************************************
NOT DEFTERİ ÇAĞIRMA/ NOTEBOOKON CLİCKFile.Run("Notepad.exe", "", "", SW_SHOWNORMAL, false)
blnEmbedded=false;
while (blnEmbedded==false) do
windows = Window.EnumerateTitles();
window_name = "Untitled - Notepad";
-- Loop through the table of windows.
for handle, title in windows do
-- Check if the window title has the target text.
result = String.Find(title, window_name, 1, false);
-- if the string was found in the title, send the window a close message.
if (result ~= -1) then
blnEmbedded=true;
--Dialog.Message("","IN")
result = DLL.CallFunction(_SystemFolder .. "\\User32.dll", "SetParent",
handle..","..Application.GetWndHandle(), DLL_RETURN_TYPE_LONG,
DLL_CALL_STDCALL)
Window.SetSize(handle,550,300)
Window.SetPos(handle,50,50)
Page.Redraw()
Window.Show(handle)
end
end
end
QUİCK HELPTip: Press Ctrl+Space to view a list of all available actions.
*****************************************
OTOMATİK VİDEO BAŞLAT KAPAT/ VİDEO SHOW ON OFFBUTONA UYGULAMA-- Here is an example of using the CamPlay.exe (
[Linkleri görebilmek için üye olun veya giriş yapın.] with your .avi videos and videos created with the TSCC codec
--------------------------------------------------------------------------------------------------------------
File.Run("AutoPlay\\Docs\\CamPlay.exe", "CAMPLAY /A /E AutoPlay\\Videos\\movie.avi", "", SW_SHOWNORMAL, true);--
--------------------------------------------------------------------------------------------------------------
--[[ All of the Command-Line options are listed below for the CamPlay.exe (.avi player)
4.1 Command Line Parameters
When you launch Camtasia Player, by default it has a title bar,
a menu bar, a tool bar, a status bar. You can customize those
elements by specifying arguments on the command line when
launching Camtasia Player. Here is the exact syntax for the
command line arguments:
CAMPLAY [
] []
where is an optional movie file name and is an
optional set of options among the following:
/A - Launches with "Always on top" option
/BC RGB(255,0,255) - Set background color, default is black
/D - Launches without allowing "Dragging" by the movie area
/E - Exits after playing the movie
/F - Launches in Full Screen Mode
/M - Launches without a menu bar
/MX - Launches with its window maximized
/open - Open the specified movie () but does not play it
/play - Immediately play the specified movie () [default]
/R - Repeats the movie forever
/S - Launches without a status bar
/ST - Stay on last frame after playing
/T - Launches without a title bar
/TB - Launches without a tool bar
Notes:
- For the /BC background color, you must supply a color argument
with the syntax RGB(r,g,b) where r, g, and b are the red, green
and blue components of the color. Valid values for r, g, and b
are in the range 0 to 255. For example:
RGB(0,0,0) = black
RGB(255,255,255) = white
RGB(0,0,255) = blue
RGB(128,128,128) = dark gray
The background color shows only when the movie that is playing
does not fill the entire frame. For example, if the player is
maximized while a 360x240 movie is playing, the background color
will show.
Examples:
CAMPLAY "clip1.avi"
- play "clip1.avi" with the default user interface
CAMPLAY /E /F "my movie.avi"
- play "my movie.avi" full screen and exit after playing
CAMPLAY /M "clip2.avi"
- open "clip2.avi" without a menu bar (i.e. no File>Open menu
option)
CAMPLAY /BC RGB(128,128,128) /F "clip3.avi"
- play "clip3.avi" full screen and fill the background with dark
gray if the movie does not fill the entire screen.
]]
*****************************************
NOT: Fırsat Buldukça Ekleyeceğim Sizlerde Eklerseniz Paylaşım Tam Olur...