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

Вниз

объявление функции   Найти похожие ветки 

 
bober   (2004-10-13 16:15) [0]

Сразу прошу у всех сорри за ламерский вопрос, но всеже как правильно объявить следующую функцию в type?

function SearchForText_AndSelect(RichEdit: TRichEdit; SearchText: string): Boolean;
begin
bla-bla-bla
end;

function SearchForText_AndSelect(const RichEdit:TRichEdit;const SearchText: string): Boolean; - не проходит.


 
Ega23 ©   (2004-10-13 16:17) [1]

Полный код давай.
Не функции, а объявления.
И что значит "не проходит"? Что компилятор говорит?


 
bober   (2004-10-13 16:21) [2]

ругается на
function SearchForText_AndSelect(const RichEdit:TRichEdit;const SearchText: string): Boolean;

[Error] Unit2.pas(21): Unsatisfied forward or external declaration: "TForm2.SearchForText_AndSelect"

запускаю функцию со след-ми параметрами:
SearchForText_AndSelect(RichEdit1,Edit1.Text);


 
Ega23 ©   (2004-10-13 16:28) [3]

У тебя эта функция является методом класса TForm2. Соответственно, описание функции должно выглядеть следующим образом:

function TForm2.SearchForText_AndSelect(RichEdit: TRichEdit; SearchText: string): Boolean;
begin
bla-bla-bla
end;


 
Pentium133 ©   (2004-10-13 16:38) [4]

Господа!
Не забываем про Ctrl-Shift-C!
(для тех кто не в курсе: в объявлении класса пишем procedure  MyPros; и сразу нажимаем)


 
Ega23 ©   (2004-10-13 16:44) [5]

Pentium133 ©   (13.10.04 16:38) [4]

Угу. Только short-cut"ы у аськи предварительно отключаем...  :о)


 
Grrey   (2004-10-13 17:31) [6]

По моему bober пытается сделать следующее:

TSearchForText_AndSelect = function (RichEdit: TRichEdit; SearchText: string): Boolean;

Просто объясняет это не правильно.


 
Pentium133 ©   (2004-10-13 17:36) [7]


> Grrey   (13.10.04 17:31) [6]

Пусть bober сам скажет. Или будем рассматривать все возможные варианты? :)


 
WondeRu ©   (2004-10-13 17:38) [8]

bober   (13.10.04 16:15)
const RichEdit:TRichEdit

бред! RichEdit в данном случае указатель на объект.


 
Grrey   (2004-10-13 17:41) [9]

Судя по
bober   (13.10.04 16:21) [2]
Ega23 дал самый правильный ответ.
Пропустил, каюсь.


 
П7   (2004-10-13 17:43) [10]

В type это будет выглядеть как:

type
 fncSearchForText_AndSelect : function(RichEdit: TRichEdit; SearchText: string): Boolean;

ага


 
Ega23 ©   (2004-10-13 17:54) [11]

бред! RichEdit в данном случае указатель на объект.

Кстати, да! const убери.


 
begin...end ©   (2004-10-13 18:20) [12]


> [10] П7   (13.10.04 17:43)


> :

=


 
П7   (2004-10-13 18:37) [13]


> begin...end ©   (13.10.04 18:20) [12]

Это ты на каком наречии изъяснился? (: Может я такой тупой, но я вот не понял, что ты хотел мне сказать... (:


 
Ega23 ©   (2004-10-13 18:40) [14]

Это ты на каком наречии изъяснился? (: Может я такой тупой, но я вот не понял, что ты хотел мне сказать... (:

Это он изъяснился, что ты пургу прогнал.
Вместо
type
fncSearchForText_AndSelect : function(RichEdit: TRichEdit; SearchText: string): Boolean;


дожно быть
type
fncSearchForText_AndSelect = function(RichEdit: TRichEdit; SearchText: string): Boolean;



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

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

Наверх




Память: 0.47 MB
Время: 0.035 c
1-1098187175
Relaxxx
2004-10-19 15:59
2004.10.31
Где мне найти функцию написания числа прописью, с использованием


9-1088730682
Xerx
2004-07-02 05:11
2004.10.31
X Window


4-1096379291
Shira333
2004-09-28 17:48
2004.10.31
Как в окне чужого приложения создать поле ввода???


8-1091559275
DreymanD
2004-08-03 22:54
2004.10.31
Видео кодеки.


1-1098004886
Татьяна
2004-10-17 13:21
2004.10.31
StringGrid. Как переместить фокус ввода в определенную ячейку???





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский