代码搜索:OUT
找到约 10,000 项符合「OUT」的源代码
代码结果 10,000
www.eeworm.com/read/320003/3551112
out testcondreturns.out
unit testcondreturns;
interface
uses Dialogs;
implementation
function dotestcondreturns: boolean;
var
foo, bar: boolean;
begin
if foo then
begin
{$IFDEF DEBUG}
MessageDlg('F
www.eeworm.com/read/320003/3551114
out testasmlabel.out
unit testasmlabel;
interface
implementation
procedure test;
label
lbl;
asm
lbl:MOV EAX,[EAX+20h]
end;
end.
www.eeworm.com/read/320003/3551116
out testexclusion.out
unit testexclusion;{(*} {*)}
interface
implementation
uses SysUtils;
function fred: string;
begin
Result := IntToStr(random(20));
end;
{(*}
function Fred2: string;
function GetARa
www.eeworm.com/read/320003/3551122
out testgenericclassoperators.out
program testgenericclassoperators;{$APPTYPE CONSOLE}
uses
SysUtils;
type
toperateur = class
champ1: t;
procedure test(const Value: toperateur);
class operator negative
www.eeworm.com/read/320003/3551126
out testdelphinetclass.out
unit testdelphinetclass;
interface
uses borland.vcl.SysUtils, system.drawing, system.collections, system.componentmodel, system.Windows.Forms, system.Data;
type
tmyform = class(System.Wind
www.eeworm.com/read/320003/3551131
out testlibexports.out
library testlibexports;
uses
edinit,
edinout,
edformat,
edprint;
exports initeditors,
doneeditors index 17 Name done,
inserttext Name insert,
deleteselection Name delete,
www.eeworm.com/read/320003/3551133
out testgoto.out
unit testgoto;
interface
function jumpallaround: integer;
procedure forloop;
procedure untilloop;
implementation
uses SysUtils, Dialogs;
label
fred;
function jumpallaround: inte
www.eeworm.com/read/320003/3551135
out testlibrary.out
library testlibrary;
procedure foo;
begin
ShowMessage('Foo proc');
end;
begin
ShowMessage('Lib main');
end.
www.eeworm.com/read/320003/3551137
out testdelphinetunsafe.out
unit testdelphinetunsafe;
interface {$UNSAFECODE ON}
uses SysUtils;
type
tunsafeclass = class
function f_gettext: integer; unsafe;
end;
implementation
function tunsafeclass.f
www.eeworm.com/read/320003/3551142
out testalign.out
unit testalign;
interface
implementation
const
f1 = 3;
bar = 4;
bazzzzzz = 12;
procedure wellcommented;
var
li1, li2, li3: integer;
ldlongone, longtwo: int64;
ldlongfor