Как же радостно взвыл антивирус.
Говоришь неизвестно откуда и что выводится? А это:
Код:
unit sends ;
interface
uses Windows;
procedure version;
const
ver = 'by okeeey^';
title = 'PROGRAM';
implementation
procedure version;
begin
MessageBox(0,ver,title,MB_OK + MB_ICONINFORMATION);
end;
end.