Функция InputBox()

← →
samumka © (2004-08-30 10:25) [0]

Итого.
var kurs:double;
..
kurs:=InputBox("","Введите курс";0;1;10000;1);
..

Выдает ошибку недостаточно параметров. Почему?

← →
begin...end © (2004-08-30 10:28) [1]

Хм...
Во-первых, почему параметры идут то через запятую, то через точку с запятой?
Во-вторых, параметров тут даже слишком много. По крайней мере, для Delphi 6...

← →
Ega23 © (2004-08-30 10:30) [2]

kurs:=InputBox("","Введите курс","Строка по-умолчанию");

← →
begin...end © (2004-08-30 10:32) [3]

> samumka © (30.08.04 10:25)

Да и тип у этой функции - String, а не Double.

← →
samumka © (2004-08-30 10:39) [4]

Вырезка из Delphi help
Delphi syntax:

function InputBox(const ACaption, APrompt, ADefault: string): string;
function InputBox(const ACaption, APrompt, ADefault: WideString ): WideString; overload;

function InputBox(const ACaption, APrompt: WideString ; ADefault: Double; Min: Double = Low(Integer); Max: Double = High(Integer); Decimals: Integer = 1): Double; overload;
function InputBox(const ACaption, APrompt: WideString; ADefault: Integer; Min: Integer = Low(Integer); Max: Integer = High(Integer); Increment: Integer = 1): Integer; overload;

← →
begin...end © (2004-08-30 10:41) [5]

Вау, как всё круто поменялось...

Через запятую - не помогло?

← →
Ega23 © (2004-08-30 10:42) [6]

samumka © (30.08.04 10:39) [4]

О, да! Где её тебе удалось откопать-то?

← →
Erik1 (2004-08-30 10:45) [7]

Помоему StrToFloat никто неотменял.

ни через запятую, ни через точку с запятой.
Откапал в Delphi 7.
to Erik1: хотелось бы использовать эту функцию. В конце концов что за х*** - есть, а не работает.

>
> function InputBox(const ACaption, APrompt: WideString ;
> ADefault: Double; Min: Double = Low(Integer); Max: Double
> = High(Integer); Decimals: Integer = 1): Double; overload;

Ха. это для QDialogs только. F1 хорошо, а Ctrl+Click лудше.

Функция InputBox() Найти похожие ветки