delphi prompt inputbox cancel code example

Example: inputbox delphi

InputString:= Dialogs.InputBox('Input Box', 'Prompt', 'Default string')