Обсуждение программирования на Delphi в конференции ru.delphi
Java
_Kanniti va mina san!!!_
Дико извеняюсь за оффтопик, просто не знаю к кому обратиться.
1 - Какие эхи по разбору Java языка?
2 - Можно ли как-то из Делфи писать на Жабе? - может это из области фантастики?
_Do: arigato, Juriy aka *MonkMY [@] [] ---=[ma[r[]fa[kz]=---*_
* Origin: !!!Banzay!!! (2:463/561.5438)
Re: Java
From: "Igor E.Timofeev" <TimofeevI [@] mail.zabtrans.ru>
Здравствуйте, Juriy.
Вы писали 14 июля 2005 г., 12:14:04:
> 2 - Можно ли как-то из Делфи писать на Жабе? - может это из области фантастики?
Hет, сынок, это фантастика.
:-))
--
С уважением,
Igor E.Timofeev
* Origin: Zabaykal Computer Networks (2:5020/400)
Hет звука, а должен быть.
From: "Anatoly Podgoretsky" <anatoly [@] podgoretsky.com>
Hello, Andrey!
You wrote to Igor Dolgov on Wed, 13 Jul 2005 21:51:51 +0000 (UTC):
??>> Что же вы меня все время в директории тычете?!
AR> Теперь потыкаем в флаги :) SND_PURGE - Sounds are to be stopped for the
AR> calling task. If pszSound is not NULL, all instances of the specified
AR> sound are stopped. Можно только догадываться зачем ты пытаешся его
AR> проиграть командой "СТОП" :-)
Это уже не первый флаг
Hу не понимает человек ни про флаги, ни про каталоги, которые почему то
директориями называет и еще и претензии предъявляет. Справка также
недоступна.
Тяжело ему программировать с таким подходом, простой вопрос затягивается на
недели и теряет собеседников при таком отношении к ним.
Кончится тем что он АУ, а ему в ответ тишина.
С уважением!
Анатолий Подгорецкий
* Origin: Demos online service (2:5020/400)
Re: 1000 pаз в секунду
From: "Roman Zenin" <zrm [@] tamb.ru>
Привет, Sergey Medintsev!
> как pеализовать цикл котоpый нужно повтоpить 1000 pаз в секунду?
>
> while и sleep(1) - не дают желаемого pезультат. Цикл повтоpяется пpимеpно
500
> pаз на машине CPU: 1600, RAM: 96Mb...
Отмеряй время выполнения кода с помощью QueryPerformanceCounter
Вот пример:
procedure TForm1.Button1Click(Sender: TObject);
var tBegin, tEnd, tFreq: TLargeInteger;
tB, tE: TLargeInteger;
Tm, Tm1: Extended;
i: Integer;
begin
QueryPerformanceFrequency(tFreq);
QueryPerformanceCounter(tB);
for i := 1 to 1000 do begin
QueryPerformanceCounter(tBegin);
repeat // Этот цикл-задержка в 1мс
QueryPerformanceCounter(tEnd);
Tm := (tEnd - tBegin) / tFreq * 1000; // Время выполнения кода в мс
until Tm >= 1;
end;
QueryPerformanceCounter(tE);
Tm1 := (tE - tB) / tFreq * 1000;
end;
У меня время выполнения цикла FOR составляет примерно 1008-1011 мс.
А дальше думай, пробуй как повысить точность.
--
Roman Zenin zrm [@] tamb.ru
* Origin: PJSC CenterTelecom Tambov Branch office (2:5020/400)
Re: Отладка
"Alexey Cherepanov" <alexey [@] soft5.com>
> Я немного не то имел в виду:
>
> Присвоение nil переменой обьектного типа инициализирует переменную но не
> обьект. Вот в С++ я описал глобальную переменную
>
> CFoo foo;
>
> и переменная и обьект у меня инициализирован (конструкторы отработали) :)
>
> А в дельфи при таком же обьявлении
>
> foo:TFoo;
>
> foo примет предопределенное значение, говорящие о том что обьект
> *возможно* не
> инициализирован.
Это зависит от самого foo. Если foo - глобальная переменная, то foo=NIL.
Если foo - локальная переменная, то foo=мусор. Определить инициализирован
объект или нет, невозможно. Если foo - член класса, то foo=NIL.
* Origin: South Ural Network (2:5010/70)
Re: Java
"Juriy Nikitchuck" <Juriy.Nikitchuck [@] p5438.f561.n463.z2.fidonet.org>
> Дико извеняюсь за оффтопик, просто не знаю к кому обратиться.
> 1 - Какие эхи по разбору Java языка?
fido7.ru.java и fido7.ru.java.*
> 2 - Можно ли как-то из Делфи писать на Жабе? - может это из области
> фантастики?
Hет. Правда пользоваться ее текстовым редактором, для написания жабьего
кода, вполне можно, вопрос только в том насколько это удобно.
* Origin: South Ural Network (2:5010/70)
Re: Hормальный компонент меню в стиле XP
From: Alexander Grischenko <gralex [@] ml.lv>
Yura Balyuk пишет:
> metal will never die, Igor!
>
> 10 Июл 05 01:00, Igor Dolgov пишет -> Yura Balyuk следующее:
>
> ID>>> Да и туториал будет очень большой.
> YB>> почему же? а ты без картинок...
> ID> Попроси хирурга описать кратенько как сделать, например,
> ID> аорто-коронарное шунтирование. :)
> ID> Мол научиться очень хочется, а медицинское образование получать влом
> ID> :)
>
> без образования - вполне возможно научится.. было бы желание.. и терпение
> учителя... согласись.. :)
Hе соглашусь. Я к такому врачу лечиться не пойду, ты уж извини, свое здоровье
дороже, а подопытным кроликом становиться не собираюсь :)
--
Alexander Grischenko
<gralex(at)ml.lv>
* Origin: Demos online service (2:5020/400)
Indi 10. Hа TIdTCPServer получить хост клиента
From: "Michael Fishman" <fishman [@] elserv.msk.su>
Привет!
Как в событии TCPServerConnect(AContext: TIdContext) или
TCPServerExecute(AContext: TIdContext),
получить Host обратившегося клиента?
С уважением, Михаил.
* Origin: Gamma NNTP server Moscow Russia (2:5020/400)
Re: Java
From: "Alexander B. Bokovikov" <bokovikov [@] apress.ru>
On Thu, 14 Jul 2005 11:06:06 +0400, "Andrew V. Fionik"
<fionika [@] papillon.ru> wrote:
>Hет. Правда пользоваться ее текстовым редактором, для написания жабьего
>кода, вполне можно, вопрос только в том насколько это удобно.
А что, в Дельфи уже {} стали заменять begin end ?
А иметь весь код закоментаренным - сомнительное удовольствие.
Лучше уж билдер тогда юзать :)
Александр Боковиков
E-mail: bokovikov(a)mail.ru (дом.) abokovikov(a)apress.ru (раб.)
www.apress.ru/pages/bokovikov/delphi
* Origin: Demos online service (2:5020/400)
нужен unzip.pas
metal will never die, All!
* Оригинал написан в kiev.delphi
>> Также закинуто в ru.delphi, ru.delphi.chainik
у кого есть?
Удачи!
np: Behemoth'1998 - Pure And Evil Hate [playing [@] 192 kbps]
* Origin: у Ильи Попова мания говна (2:4625/9.15)