代码搜索:OUT
找到约 10,000 项符合「OUT」的源代码
代码结果 10,000
www.eeworm.com/read/320003/3551061
out testgenericconstructorstatic.out
program testgenericconstructeurstatic;{$APPTYPE CONSOLE}
uses
SysUtils;
type
econtrainteargumentexception = class(ArgumentException);
maclasse = class
unchamp: t;
s: stri
www.eeworm.com/read/320003/3551065
out testincat.out
unit testincat;
interface
implementation
procedure foo;
var
at: integer;
begin
at := 2;
Inc(at, 2);
end;
end.
www.eeworm.com/read/320003/3551067
out testblanklineremoval.out
unit testblanklineremoval;
interface
implementation
uses SysUtils;
procedure testblanklines1;
var
a: integer;
b: string;
c, d, e, f: double;
begin
end;
procedure testblankli
www.eeworm.com/read/320003/3551068
out testcast.out
unit testcast;
interface
function castnumeric: integer;
procedure messwithobjects;
implementation
uses Classes, SysUtils, Dialogs, ComCtrls, StdCtrls;
function castnumeric: integer;
v
www.eeworm.com/read/320003/3551069
out testreint.out
unit testreint;
interface
type
tfoo = class(TObject)
public
procedure foo; virtual;
end;
tbar = class(TFoo)
public
procedure foo; reintroduce;
end;
tlinebreak
www.eeworm.com/read/320003/3551071
out testcastsimple.out
unit testcastsimple;
interface
uses Classes, StdCtrls;
var
lcstrings: TStringList;
lcobj: TObject;
lcbutton: TButton;
implementation
procedure testdot;
var
lc: TObject
www.eeworm.com/read/320003/3551076
out testgenericinterface.out
program testgenericinterface;{$APPTYPE CONSOLE}
uses
SysUtils;
type
imoninterface<
t> = interface
procedure set_valeur(const avaleur: t);
function get_valeur: t;
property
www.eeworm.com/read/320003/3551077
out testprogram.out
program testprogram
uses
Forms,
SysUtils,
syncobjs,
Classes,
Windows,
settings in 'Settings\Settings.pas',
log in 'Log.pas',
globals in 'Globals.pas',
spinpalette in 'Pal
www.eeworm.com/read/320003/3551081
out testdefines.out
unit testdefines;
interface
implementation {$UNDEF FOO}{$UNDEF BAR}
procedure test1;
begin
{$IF (not Defined(FOO)) and (not defined(BAR))}
end;
{$IFEND}{$IF Defined(FOO) or defined(BAR)
www.eeworm.com/read/320003/3551089
out testdelphinetnestedtype.out
unit testdelphinetnestedtype;
interface
type
touterclass = class
private
myfield: integer;
public
type tinnerclass = class
public
myinnerfield: integer;
pro