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

Вниз

Процедуры   Найти похожие ветки 

 
Elec3C ©   (2008-03-23 02:01) [0]


...
var
  p : procedure;
...
procedure Test;
var i : Byte;
begin
  i := 1; Inc(i);
end;
...

Как лучше делать: так p := Test; или так p := @Test;


 
Германн ©   (2008-03-23 02:09) [1]


> Процедуры
>
> Elec3C ©   (23.03.08 02:01)
>
>
> ...
> var
>   p : procedure;
> ...
> procedure Test;
> var i : Byte;
> begin
>   i := 1; Inc(i);
> end;
> ...
>
> Как лучше делать: так p := Test; или так p := @Test;
>

Лучше никак не делать. Эту процедуру лучше сразу забыть как кошмарный сон приснившийся в пьяном угаре с большого бодуна!


 
{RASkov} ©   (2008-03-23 02:46) [2]


> [0] Elec3C ©   (23.03.08 02:01)
> Как лучше делать: так p := Test; или так p := @Test;

Да помоему без разницы.... Лучше без "собаки", хоть выглядит естественнее...

> [1] Германн ©   (23.03.08 02:09)
> Эту процедуру лучше сразу забыть как кошмарный сон

Да это, по всей видимости, неудачный пример :) Т.е. дело не в Test"е, а в присвоении...


 
{RASkov} ©   (2008-03-23 02:47) [3]

> дело не в Test"е

О как.... не в тесте дело, а в пекаре :)


 
Германн ©   (2008-03-23 02:50) [4]


> > [1] Германн ©   (23.03.08 02:09)
> > Эту процедуру лучше сразу забыть как кошмарный сон
>
> Да это, по всей видимости, неудачный пример :) Т.е. дело
> не в Test"е, а в присвоении...
>

А я и забыл, что мы тут соревнуемся в телепатии. :(((


 
{RASkov} ©   (2008-03-23 03:00) [5]

> [4] Германн ©   (23.03.08 02:50)
> А я и забыл, что мы тут соревнуемся в телепатии.

Да какие соревнования? Впрочем вопрос довольно НЕ четко поставлен..
Да собственно и самого вопроса-то нет оказывается....:( а так это, пояснение как лучше вам сделать...
т.е. делайте так или так, на ваше усмотрение...)
Вот ведь.... и в правду - докопаться можно и до столба :)
:о)


 
{RASkov} ©   (2008-03-23 03:04) [6]

Ну а сама процедура Test, из [0], согласен, не то что "кошмарный сон приснившийся в пьяном угаре с большого бодуна", а вапще ужос полнейший, да и бестолковый :)


 
{RASkov} ©   (2008-03-23 03:09) [7]

> [6] {RASkov} ©   (23.03.08 03:04)

Кстати, если бы она(Test) не была такой бредовой, то может быть и стоило бы задуматься в чем же прикол(вопрос) поста [0] :)


 
Elec3C ©   (2008-03-23 03:17) [8]

Я блин спросил как лучше присваивать, а тут как обычно понесли чёрти знает что! Толкового ответа не получил! Ветка закрыта!


 
{RASkov} ©   (2008-03-23 03:20) [9]

> [8] Elec3C ©   (23.03.08 03:17)

var p: procedure;

procedure Test;
begin
 ShowMessage(IntToStr(Integer(@p)));
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 ShowMessage(IntToStr(Integer(@Test)));
 Test;
 p:=Test;
 p;
 p:=@Test;
 p;
end;


 
Германн ©   (2008-03-23 03:20) [10]


> RASkov} ©   (23.03.08 03:04) [6]
>
> Ну а сама процедура Test, из [0], согласен, не то что "кошмарный
> сон приснившийся в пьяном угаре с большого бодуна", а вапще
> ужос полнейший, да и бестолковый :)
>

Ну это твой перевод с моего языка на твой (ну или не на твой, но твоих современников :)
А уж сам вопрос в сабже???
Он об чём?


 
Германн ©   (2008-03-23 03:27) [11]


> Elec3C ©   (23.03.08 03:17) [8]
>
> Я блин спросил как лучше присваивать, а тут как обычно понесли
> чёрти знает что! Толкового ответа не получил! Ветка закрыта!
>
>

Ты вот спросил именно "как блин".
А ветку так просто не закрыть. Тут такие ветки, как правило, оставляют на всеобщее обозрение. Чтобы учились.


 
{RASkov} ©   (2008-03-23 03:28) [12]

> [10] Германн ©   (23.03.08 03:20)
> А уж сам вопрос в сабже???
> Он об чём?

В сабже его(вопроса) вообще нет, но в [8] он вроде как уточнил в чем соль... Ну и как обычно мы все виноваты оказались...
:о)


 
Германн ©   (2008-03-23 03:43) [13]


> {RASkov} ©   (23.03.08 03:28) [12]
>
> > [10] Германн ©   (23.03.08 03:20)
> > А уж сам вопрос в сабже???
> > Он об чём?
>
> В сабже его(вопроса) вообще нет, но в [8] он вроде как уточнил
> в чем соль... Ну и как обычно мы все виноваты оказались.
> ..
> :о)
>

Нуу...
Соль нужна человеческому организму. Но "во благовремении и плепорции". :)


 
Elec3C ©   (2008-03-23 04:13) [14]

Удалено модератором


 
Плохиш ©   (2008-03-23 12:05) [15]

Мы знаем, что не царское это дело книжки читать. Только не понятно, на кой царю программирование, у него же бабла не мерянно, может программистов нанять, ан нет лезут цари-сантехники в программисты...


 
Anatoly Podgoretsky ©   (2008-03-23 16:12) [16]


> Я блин спросил как лучше присваивать, а тут как обычно понесли
> чёрти знает что! Толкового ответа не получил! Ветка закрыта!
>

Ну это как обычно с твоими вопросами, пора бы и задуматься, лучше всего сменить профессию. И стране польза и тебе.


 
Anatoly Podgoretsky ©   (2008-03-23 16:14) [17]


> По [9] я так понял, без разницы, как присваивать.

Ты чего это пишешь, ты же закрыл для себя ветку, теперь только мы имеем право в нее писать. Непорядочно это, по свински.



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

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

Наверх




Память: 0.48 MB
Время: 0.049 c
4-1187171747
suspeded
2007-08-15 13:55
2008.04.20
Проверить права администратора


15-1204759276
Германн
2008-03-06 02:21
2008.04.20
Ord vs Integer


3-1196183873
AntonUSAnoV
2007-11-27 20:17
2008.04.20
не могу сформулировать, проблема записи в поля типа dbmemo, dbedi


2-1206456673
tim
2008-03-25 17:51
2008.04.20
вопрос по потокам


15-1204470388
sniknik
2008-03-02 18:06
2008.04.20
Классная картинка!





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