[St1mul]

Сообщение от arksu

Move(KeyIntrl,key2[8],8);

ну и что это значит то? просто в делфи не силен

// procedure Move ( const SourcePointer; var DestinationPointer; CopyCount : Integer ) ;
// да собсно вот: http://www.delphibasics.ru/Move.php
благодарю