Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

объявление функции [D7, WinXP]

bober © (2004-10-13 16:15:00)
Сразу прошу у всех сорри за ламерский вопрос, но всеже как правильно объявить следующую функцию в 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 18:40:00) [1]
Это ты на каком наречии изъяснился? (: Может я такой тупой, но я вот не понял, что ты хотел мне сказать... (:

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

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

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

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

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

begin...end (2004-10-13 18:20:00) [3]

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

> :

=

Ega23 (2004-10-13 17:54:00) [4]
бред! RichEdit в данном случае указатель на объект.

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

П7 (2004-10-13 17:43:00) [5]
В type это будет выглядеть как:
type fncSearchForText_AndSelect : function(RichEdit: TRichEdit; SearchText: string): Boolean;
ага

Grrey (2004-10-13 17:41:00) [6]
Судя по
bober (13.10.04 16:21) [2]
Ega23 дал самый правильный ответ.
Пропустил, каюсь.

WondeRu (2004-10-13 17:38:00) [7]
bober (13.10.04 16:15)
const RichEdit:TRichEdit
бред! RichEdit в данном случае указатель на объект.

Pentium133 (2004-10-13 17:36:00) [8]

> Grrey (13.10.04 17:31) [6]

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

Grrey (2004-10-13 17:31:00) [9]
По моему bober пытается сделать следующее:

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

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

Ega23 (2004-10-13 16:44:00) [10]
Pentium133 © (13.10.04 16:38) [4]

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

Pentium133 (2004-10-13 16:38:00) [11]
Господа!
Не забываем про Ctrl-Shift-C!
(для тех кто не в курсе: в объявлении класса пишем procedure MyPros; и сразу нажимаем)

Ega23 (2004-10-13 16:28:00) [12]
У тебя эта функция является методом класса TForm2. Соответственно, описание функции должно выглядеть следующим образом:

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

bober (2004-10-13 16:21:00) [13]
ругается на
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:17:00) [14]
Полный код давай.
Не функции, а объявления.
И что значит "не проходит"? Что компилятор говорит?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »