Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.09.12;
Скачать: CL | DM;

Вниз

Зачем клаве Scroll Lock?   Найти похожие ветки 

 
WondeRu ©   (2004-08-24 13:25) [0]

Мне нужен только для того чтобы какая-нить прога могла им поморгать и не более того! Зачем она??? Может когда-то была полезна?


 
Kerk ©   (2004-08-24 13:28) [1]

давным-давно... далеко-далеко в галактике...
насколько я понимаю, это запрет скроллинга в консоли


 
wicked ©   (2004-08-24 13:29) [2]

включи Scroll Lock и поиграй клавишами стрелок в екселе... ;)


 
Layner ©   (2004-08-24 13:36) [3]

wicked ©   (24.08.04 13:29)
А зачем так сделали, не в курсе?


 
wicked ©   (2004-08-24 13:37) [4]

> Layner [3]
без понятия...


 
clickmaker ©   (2004-08-24 13:41) [5]


> [2] wicked ©   (24.08.04 13:29)
> включи Scroll Lock и поиграй клавишами стрелок в екселе...
> ;)

Ишь ты! Вот ведь!..


 
nasty ©   (2004-08-24 13:44) [6]

в нормальных продуктах для этого служит ctrl-up/down


 
YurikGL ©   (2004-08-24 13:47) [7]

в юнихе он нужен...


 
YurikGL ©   (2004-08-24 13:51) [8]

При светящимся scroll lock клавиши вниз-вверх скролируют экран...

Не помню, где читал, но на этот же вопрос был следующий ответ: "У меня, например, scroll lock компьютер выключает"


 
Piter ©   (2004-08-24 13:56) [9]

для ноутов полезно, когда текст читаешь... За touchpad"ом тянуться лень...


 
WondeRu ©   (2004-08-24 14:50) [10]

короче бесполезная вещица! я ее ща отверткой выковыряю, потому что в экселе не работаю и линуха у меня нет! ;-)


 
Cincinnut   (2004-08-24 15:06) [11]

у меня "следующий трек"


 
REA   (2004-08-24 15:09) [12]

И в винчестере тоже отверткой поковыряй - там много лишних файлов. Также можно вырвать архаичный флопповод, COM порт и кнопку Power.


 
VID ©   (2004-08-24 15:15) [13]

REA   (24.08.04 15:09) [12]
Кто сказал что COM-порт не нужен ?!


 
WondeRu ©   (2004-08-24 15:30) [14]

VID ©   (24.08.04 15:15) [13]
согласен! Scroll -  к черту, а СОМ - не трогать!!!


 
Anatoly Podgoretsky ©   (2004-08-24 15:38) [15]

VID ©   (24.08.04 15:15) [13]
Cмотри стандарт на PC-99
Компортов и паралельных портов в компьютере быть не должно. Я уже не помню когда последний раз использовал.


 
WondeRu ©   (2004-08-24 15:42) [16]

Anatoly Podgoretsky ©   (24.08.04 15:38) [15]
откройте странички с оборудованием систем безопасности: там почти все оборудование через СОМ-порты работает, даже новейшее! Т.к. стандарты RS485 и RS232 - одни из самых распространенных в спецэлектронике! Правда щас тенденция перехода на TCP-сети, но это будет лишь через лет 5


 
Ega23 ©   (2004-08-24 15:47) [17]

WondeRu ©   (24.08.04 15:42) [16]

:о)

Коллега! "Узнаю брата Колю!!!" (с)


 
WondeRu ©   (2004-08-24 15:53) [18]

Олег, так что будем вместе выкорчевывать scroll lock?
или кто чего путного по этой пимпе скажет?


 
Ega23 ©   (2004-08-24 16:17) [19]

Олег, так что будем вместе выкорчевывать scroll lock?
или кто чего путного по этой пимпе скажет?


Я бы, (пи-и-ип), лучше все эти (пи-и-ип) протоколы, да вместе с (пи-и-ип) компами, и вообще (пи-и-ип) напьюсь я сегодня (пи-и-ип). Депрессняк (пи-и-ип) у меня (пи-и-и-и-и-и-и-и-и-и-и-и-и-и-ип).


 
Prohodil Mimo ©   (2004-08-24 16:18) [20]

zachem vikorchovivat"? dirka ostaneca... vi jejo luchshe pajal"nikom vplavte :o)


 
WondeRu ©   (2004-08-24 16:36) [21]

Ega23 ©   (24.08.04 16:17) [19]
чего это такое? Жена?


 
Ega23 ©   (2004-08-24 16:38) [22]

чего это такое? Жена?

ГДЕ-Е-Е??????    :о)


 
Cosinus ©   (2004-08-24 16:38) [23]

Да вы чЁ??? Пиши прогу, вешай глобальный хук и ФФФсе! "Мастера DELPHI" одной кнопкой ;) Как на ноутах.
Ну или любой другой сайт в настройках;))))


 
Ega23 ©   (2004-08-24 16:39) [24]

Не, начальник настроение испортил. Поорали друг на друга...


 
Prohodil Mimo ©   (2004-08-24 16:45) [25]

[24] Ega23 , lopatoj jego, lopatoj1!!! :o)


 
WondeRu ©   (2004-08-24 17:02) [26]

Prohodil Mimo ©   (24.08.04 16:45) [25]
не надо! потом лопату от крови кто отмывать будет? естественно Олег!


 
Ega23 ©   (2004-08-24 17:12) [27]

WondeRu ©   (24.08.04 17:02) [26]

А вот и не угадал! Для этого у нас в штате специальный человек есть, уборщица.  :о)


 
DeadMeat ©   (2004-08-24 18:30) [28]

Дык потом ее тоже придется... Как свидетеля... А потом другую, и другую и д....
Короче лучше самому, а то потом столько трупов вывозить надо будет... Для этого нужен грузчик...... И все по новой....

---
...Death Is Only The Begining...


 
Копир ©   (2004-08-24 22:10) [29]

А я однажды использовал эту вполне бесполезную клавишу,
чтобы одним нажатием ScrollLock сделать экран черным,
(ScreenSaverы при этом уже не...) и потом ея же нажав,
опять все увидеть вновь:))

Удобно. Приперся начальник - темный экран.
Если очень озабоченный, пусть жмет чего хочет?
Всегда можно сказать, что комп вдруг завис :@
Разве начальнику придет в голову ScrLOck нажимать?


unit Unit4;

interface

uses
 Windows, Messages, Graphics, SysUtils, Classes, Controls, Forms, RXShell;
const
ScrollKey = 101;

type
 TForm1 = class(TForm)
   RxTrayIcon1: TRxTrayIcon;
 procedure WMHotKey(var Msg : TWMHotKey); message WM_HOTKEY;
 procedure FormActivate(Sender: TObject);
   procedure FormCreate(Sender: TObject);
   procedure RxTrayIcon1Click(Sender: TObject; Button: TMouseButton;
     Shift: TShiftState; X, Y: Integer);
 private
   { Private declarations }
procedure WMGetMinMaxInfo(var msg: TWMGetMinMaxInfo); message WM_GETMINMAXINFO;

 public
   { Public declarations }
 end;
function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer; stdcall; external "KERNEL32.DLL";
procedure HideApplication;

var
 Form1: TForm1;
 p: byte;
 CState:integer;
implementation

{$R *.DFM}
procedure HideApplication;
begin
RegisterServiceProcess(GetCurrentProcessID, 1);
end;

procedure TForm1.WMGetMinMaxInfo(var msg: TWMGetMinMaxInfo);
begin
 inherited;
 with msg.MinMaxInfo^.ptMaxTrackSize do begin
   X := GetDeviceCaps( Canvas.handle, HORZRES ) + (Width - ClientWidth);
   Y := GetDeviceCaps( Canvas.handle, VERTRES ) + (Height - ClientHeight );
 end;
end;

procedure TForm1.WMHotKey (var Msg : TWMHotKey);
const
Rect: TRect = (Left: 0; Top: 0; Right: 0; Bottom: 0);
FullScreen: Boolean = False;
begin
p:=p-1;
if (Msg.HotKey = ScrollKey) then begin
if p=1 then begin
SystemParametersInfo(SPI_SETSCREENSAVEACTIVE,0,nil,0);

Cstate := ShowCursor(True);
while CState >= 0 do CState:=ShowCursor(False);
FullScreen := not FullScreen;
if FullScreen then begin
Rect := BoundsRect;
SetBounds( Left - ClientOrigin.X,
Top - ClientOrigin.Y, GetDeviceCaps( Canvas.handle, HORZRES )
+ (Width - ClientWidth), GetDeviceCaps( Canvas.handle, VERTRES )
+ (Height - ClientHeight ));
                  end
else BoundsRect := Rect;
           end;
if p=0 then begin
CState:= ShowCursor(True);
while Cstate < 0 do Cstate := ShowCursor(True);
FormActivate(Form1);
SystemParametersInfo(SPI_SETSCREENSAVEACTIVE,1,nil,0);
                              end;
p:=2;
                                end;
end;

procedure TForm1.FormActivate(Sender: TObject);
begin
HideApplication;
ShowWindow(Application.Handle,sw_Hide);

Form1.Color:=clBlack;
Form1.Width:=116;
Form1.Height:=32;
Form1.Top:=Screen.Height;
Form1.Left:=0;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.BorderStyle:=bsNone;
RegisterHotKey(Handle, ScrollKey, 0, VK_SCROLL);
p:=2;
end;

procedure TForm1.RxTrayIcon1Click(Sender: TObject; Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
begin
Close;
end;

end.


 
WondeRu ©   (2004-08-25 08:48) [30]

Копир ©   (24.08.04 22:10) [29]

извращенство, но ... прикольно!)))


 
Style ©   (2004-08-25 08:57) [31]


> Копир ©   (24.08.04 22:10) [29]


Лучше бы ты сделал экран Синим :)


 
WondeRu ©   (2004-08-25 09:18) [32]

Style ©   (25.08.04 8:57) [31]
Лучше бы ты сделал экран Синим :)


BSOD ))) У меня и без Scroll Lock"a  удавалось далать BSOD - дрова когда криво пишешь! ;-)


 
Ega23 ©   (2004-08-25 09:23) [33]

WondeRu ©   (25.08.04 09:18) [32]

Ты дрова пишешь?


 
WondeRu ©   (2004-08-25 09:39) [34]

Ega23 ©   (25.08.04 9:23) [33]
эээээ... нуууу... так скажем умею, но не пишу! ))) Практики маловато!)


 
Ega23 ©   (2004-08-25 09:41) [35]

WondeRu ©   (25.08.04 09:39) [34]

У тебя адрес тот-же остался?


 
WondeRu ©   (2004-08-25 10:05) [36]

Ega23 ©   (25.08.04 9:41) [35]
У тебя адрес тот-же остался?

ага!) wonderu(at)mail.ru



Страницы: 1 вся ветка

Текущий архив: 2004.09.12;
Скачать: CL | DM;

Наверх




Память: 0.55 MB
Время: 0.037 c
1-1093422967
Кирилл
2004-08-25 12:36
2004.09.12
Непрямоугольная форма


1-1093501571
Mitrofan
2004-08-26 10:26
2004.09.12
Одна форма для нескольких пользователей


6-1089171018
vovchik
2004-07-07 07:30
2004.09.12
Как проверить наличие машины в сети


4-1090939941
mpv
2004-07-27 18:52
2004.09.12
Время простоя


1-1093786680
Antonmm
2004-08-29 17:38
2004.09.12
Размер файла