Сорри что пишу не там... я не смог зарегиться на вашем форуме... блин, не приходит мне подтверждение на мыло..
(
Админ, помоги плз... и ещё.. вот занялся я тут этим пискалем, что-то не получается прога, ошибок нету, но наротает не так, как бы я хотел :
program Vibr;
uses vl; // Vibr and Light class
var
label_id:integer;
begin
Showform;
label_id := formAddString('MegaProga');
repeat
if GetKeyPressed = KE_KEY1 then vl.start_vibrator;
if GetKeyPressed = KE_KEY2 then vl.stop_vibrator;
until GetKeyClicked = KE_KEY0;
end.
ПРОШУ ПОМОГИТЕ