Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.02.10;
Скачать: [xml.tar.bz2];

Вниз

Передача параметра в: const AFilter: string =   Найти похожие ветки 

 
sergg   (2004-01-30 15:36) [0]

Пытаюсь использовать функцию function PromptForFileName из модуля Dialogs.
Но компилятор выдает ошибку "Constant Object cannot be passed as var parameter" и ставит курсор на второй параметр ф-ции.

Функцию я вызываю подобным образом:
PromptForFileName("depletion.mdb","*.mdb","","asd","",false)
Вместо "*.mdb" пробовал подставлять константы, переменные, просто - "", - все равно одна и таже ошибка:(

Подскажите пожалуйста, или дайте ссылочку как тут быть.


 
Тимохов   (2004-01-30 15:40) [1]

Тебе же сказано, что первый параметр var.
делай так
var
fn: string;
begin
fn := "depletion.mdb";
PromptForFileName(fn,"*.mdb","","asd","",false)
end;

И вообще, если возникают такие проблемы, то настоятельно реккомендую прочесть хелп по поводу передачи параметров в процедуры и функции.


 
MBo   (2004-01-30 15:42) [2]

ВСЕ строковые параметры этой функции - должны быть переменные, а не непосредственные значения, как у тебя


 
Яичница   (2004-01-30 15:43) [3]

function PromptForFileName(var AFileName: string; const AFilter: string = ""; const ADefaultExt: string = ""; const ATitle: string
= ""; const AInitialDir: string = ""; SaveDialog: Boolean = False): Boolean;

Следствие- первый параметр не может быть const

PromptForFileName( "depletion.mdb","*.mdb","","asd","",false)
надо исправить примерно так:
var name:string;
....
PromptForFileName( name,"*.mdb","","asd","",false)


 
MBo   (2004-01-30 15:44) [4]

про все я загнул, конечно, var только ;)


 
Тимохов   (2004-01-30 15:44) [5]


> ВСЕ строковые параметры этой функции - должны быть переменные,
> а не непосредственные значения, как у тебя


Все-то зачем?
Только первая кажись:

function PromptForFileName(var AFileName: string; const AFilter: string = ""; const ADefaultExt: string = ""; const ATitle: string = ""; const AInitialDir: string = ""; SaveDialog: Boolean = False): Boolean;


 
MBo   (2004-01-30 15:46) [6]

>Все-то зачем?
Остапа несло ;))


 
sergg   (2004-01-30 22:18) [7]

Когда Шерлок Холмс объяснял Ватсону ход своей мысли тот восклицал: "Е-мое как же все просто".
Спасибо :)



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.02.10;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.007 c
3-29260
Korenb Grif
2004-01-17 19:32
2004.02.10
Dbgrid илил table


7-29638
KPPL
2003-11-22 22:35
2004.02.10
Printer


1-29469
XfroSt
2004-01-30 13:38
2004.02.10
Сохранение части реестра в файл


14-29540
}|{yk
2004-01-20 19:33
2004.02.10
генетические эксперименты


1-29369
rel_
2004-01-29 10:55
2004.02.10
TEdit - курсор





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский