M I D l e t P a s c a l
GetTextBoxString

Функция возвращает текст, введенный пользователем в поле ввода типа TextBox.

function GetTextBoxString:string;
 



Пример

var cont : command;
    quote : string;
begin
    ShowTextBox('Введи свою любимую поговорку', 'Быть или не быть? Не быть.', 200, TF_ANY);
    cont := CreateCommand('Дальше', CM_SCREEN, 1);
    AddCommand(cont);

    repeat
      delay(100);
    until GetClickedCommand <> EmptyCommand;

    quote := GetTextBoxString;

    ...     
end.





Совместимость

MIDP1.0




Требуемый модуль

Не требуется




Смотри также

ShowTextBox