home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C!T ROM 2
/
ctrom_ii_b.zip
/
ctrom_ii_b
/
PROGRAM
/
PASCAL
/
TPBOOK
/
DMSGBOX3.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1992-08-07
|
216b
|
10 lines
{ DMSGBOX3.PAS
Demonstrates use of InputBox
}
procedure TShell.DemoInputBox;
var
Control : Word;
begin
Control := InputBox('The Title', 'Enter some text:', FileName, 30);
end; { TShell.DemoInputBox }