代码搜索：FastScript
找到约 496 项符合「FastScript」的源代码
代码结果 496
www.eeworm.com/read/338159/3320026
cpp string.cpp
/****************************/
/* FastScript v1.0 */
/* String demo */
/****************************/
int i, j;
string s;
void OK(int n)
{
ShowMessage(n);
}
{
www.eeworm.com/read/338159/3320042
cpp for.cpp
/****************************/
/* FastScript v1.0 */
/* 'For' operator demo */
/****************************/
int i;
void OK(int n)
{
ShowMessage(n);
}
{
for(i = 0; i
www.eeworm.com/read/338159/3320052
js file.js
//**************************}
//{ FastScript v1.0 }
//{ Files demo }
//{**************************/
var fs = new TFileStream("test.txt", fmCreate);
var s = "Testi
www.eeworm.com/read/338159/3320055
js localvar.js
/****************************/
/* FastScript v1.0 */
/* Local variables demo */
/****************************/
var i;
function OK(i)
{
ShowMessage(i);
i = 11;
}
i
www.eeworm.com/read/338159/3320059
js for.js
//****************************/
//* FastScript v1.0 */
//* 'For' operator demo */
//****************************/
for(var i = 0; i < 10; i++)
if(i == 1) ShowMessage(1);
www.eeworm.com/read/338159/3320095
pas bmp.pas
{**************************}
{ FastScript v1.0 }
{ Bitmap demo }
{**************************}
var
bmp: TBitmap;
procedure MakePattern(b: TBitmap);
var
i, j: Integ
www.eeworm.com/read/338159/3320098
pas array.pas
{**************************}
{ FastScript v1.0 }
{ Arrays demo }
{**************************}
var
i, j: Integer;
ar: array[0..9] of String;
s: String;
begin
www.eeworm.com/read/338159/3320102
pas file.pas
{**************************}
{ FastScript v1.0 }
{ Files demo }
{**************************}
var
fs: TFileStream;
s: String;
begin
fs := TFileStream.Create('test
www.eeworm.com/read/338159/3320108
pas for.pas
{**************************}
{ FastScript v1.0 }
{ 'For' operator demo }
{**************************}
var
i: Integer;
procedure OK(n: Integer);
begin
ShowMessage(n);
end
www.eeworm.com/read/338159/3320109
pas if.pas
{**************************}
{ FastScript v1.0 }
{ 'If' operator demo }
{**************************}
var
i: Integer;
procedure OK(n: Integer);
begin
ShowMessage(n);
end