| ← Июнь 2005 → | ||||||
|
22
|
26
|
|||||
|---|---|---|---|---|---|---|
|
27
|
||||||
За последние 60 дней ни разу не выходила
Сайт листа:
http://codeguru.ru
Открыт:
21-09-2003
Пре-модерация: Нет
Адрес для писем в лист: comp.soft.prog.prog-list@subscribe.ru
Адрес
модератора: comp.soft.prog.prog-owner@subscribe.ru
Хаю ду ю ду monah?
Смотрю и вижу, как ты печатаешь умные вещи и дай-ка, думаю,
тоже что-нибудь напечатаю:
>> Отстается вопрос - как получить выбранные данные?
m> Юзай не визуальные компоненты TQwery например... создавай их вручную.
Я хочу обойтись без компонентов
Hello, Eugene!
On Wed, 8 Jun 2005 19:25:00 +0400 you wrote:
> Направление 3.
> Изучить структуру EXE или COM и написать компилятор :)
Напраление 4.
Перейти на GNU GPL, взять куски (можно целиком) gcc (или g++ или gnu ada
compiler или...) и делать с ним все что пожелаешь.
Здравствуйте, Rooslan.
Я примерно, так и понял, но нехватало уверенности и ни где ни мог
найти об этом информацию. Спасибо за помощь.
Здравствуйте, Александр.
Вы писали 8 июня 2005 г., 20:07:29:
> Хаю ду ю ду Upiter?
> Смотрю и вижу, как ты печатаешь умные вещи и дай-ка, думаю,
> тоже что-нибудь напечатаю:
U>> String в Delphi не паскалевая строка,а null-terminated string
> Но нулевой индекс все равно зарезервирован.
Вообще в Делфи string интерпритируется в зависимости от настроек
компиляции. string как ShortString или как PChar.
Поэтому и есть совместимость array[0..200] char = string[200] и
возможно stringvar:=arrayvar;
А вот сходу присвойть стрингу значение PChar не получится.
Так какой же это тип?
Здравствуйте, Александр.
Вы писали 8 июня 2005 г., 21:13:05:
> Отстается вопрос - как получить выбранные данные?
Юзай не визуальные компоненты TQwery например... создавай их вручную.
Здравствуйте, Малышев.
Вы писали 8 июня 2005 г., 22:24:17:
>> Как воспроизвести звук определенной частоты , как
>> это делает windows.beep , только через звуковую карту ?
> procedure Sound(Freq : Word);
> var B : Byte;
> begin
if Freq > 18 then
> begin
> Freq := Word(1193181 div LongInt(Freq));
> B := Byte(GetPort($61));
> if (B and 3) = 0 then
> begin
> SetPort($61, Word(B or 3));
> SetPort($43, $B6);
> end;
> SetPort($42, Freq);
> SetPort($42, Freq shr 8);
> end;
> end;
> {0--------}
> Так можно!
А на ХР сработает? И Как продолжительность установить?
Может API поможет?
Здравствуйте, Eugene.
Вы писали 8 июня 2005 г., 21:03:38:
m>> Как воспроизвести звук определенной частоты , как
m>> это делает windows.beep , только через звуковую карту ?
> В Pascal'е была функция Sound(Частота: Word);
> Ну в Делфе этого не так...(
Хаю ду ю ду andrey?
Смотрю и вижу, как ты печатаешь умные вещи и дай-ка, думаю,
тоже что-нибудь напечатаю:
a> библиотеки. Например под MySQL совсем нет необходимости тащить с собой
a> полнофункциональный сервер, достаточно использовать идущую с сервером
a> библиотеку libmysqld. API интерфей подробнейшим образом описан в
a> документации.
Надо будет глянуть...
-----Original MessageFrom: Victor V. Vakchturov [mailto:forum-moderat***@m*****.ru]
Sent: Wednesday, June 08, 2005 4:26 PM
To: comp.soft.prog.prog (3823747)
Subject: Re: Delphi звук
Здравствуйте !
> Как воспроизвести звук определенной частоты , как
> это делает windows.beep , только через звуковую карту ?
{---------}
Delphi реализовать возможность пропищать звук различной длины и частоты
procedure SetPort(address, Value:Word);
var bValue: byte;
begin
bValue := trunc(Value and 255);
asm
mov dx, address
mov al, bValue
out dx, al
end;
end;
function GetPort(address:word):word;
var bValue: byte;
begin
asm
mov dx, address
in al, dx
mov bValue, al
end;
GetPort := bValue;
end;
procedure Sound(Freq : Word);
var B : Byte;
begin
if Freq > 18 then
begin
Freq := Word(1193181 div LongInt(Freq));
B := Byte(GetPort($61));
if (B and 3) = 0 then
begin
SetPort($61, Word(B or 3));
SetPort($43, $B6);
end;
SetPort($42, Freq);
SetPort($42, Freq shr 8);
end;
end;
{0--------}
Так можно!
Номер выпуска : 4595
Возраст листа : 626 (дней)
Количество подписчиков : 527
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/381146
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru
Хаю ду ю ду Eugene the Monster?
Смотрю и вижу, как ты печатаешь умные вещи и дай-ка, думаю,
тоже что-нибудь напечатаю:
EtM> Я уже говорил на этом форуме о такой веще как MS Jet, есть по крайней
EtM> мере в WinXP и в Win2k. В 98 не знаю. Не требует инсталяции СУБД и
EtM> база в одном файле - удобно. Подключение через ADO.
А кто-нибудь вообще обратил внимание на код который я привел?
MyConn.ConnectionString :=
'Provider=MSDataShape.1;Data Provider=Microsoft.Jet.OLEDB.4.0;
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
и я указал что если что-нибудь другое кто-нибудь предложит - приводите
код, а для моего кода мне непонятно как получить выбранные записи, как
создать таблицу и как ее изменять.
Хаю ду ю ду Victor V. Vakchturov?
Смотрю и вижу, как ты печатаешь умные вещи и дай-ка, думаю,
тоже что-нибудь напечатаю:
>> Как subj при скроле?
>> Я нашел как скролить
>> WebBrowser1.OleObject.Document.ParentWindow.ScrollBy(0, 100);
VVV> Логичнее вего, наверно, обрабатывать событие onscroll объекта
VVV> window смотреть куда проскроллилось. Если до конца документа -
VVV> совершать переход в Listview.
А как до него добраться?
Хаю ду ю ду monah?
Смотрю и вижу, как ты печатаешь умные вещи и дай-ка, думаю,
тоже что-нибудь напечатаю:
m> С NT идет драйвер БД к Аксесу подходит, все что я знаю..
Тот код который я привел вроде, как мне подсказали, и есть Access,
кстати только что проверил - в win98 тоже работает.
Отстается вопрос - как получить выбранные данные?
Хаю ду ю ду Upiter?
Смотрю и вижу, как ты печатаешь умные вещи и дай-ка, думаю,
тоже что-нибудь напечатаю:
U> String в Delphi не паскалевая строка,а null-terminated string
Но нулевой индекс все равно зарезервирован.
Привет ol,
Вы мне письмо написали 7 июня 2005 г. (вторник), а я Вам отвечу вот что:
o> добрий день всем.
o> вопрос мой такой- нужно создать программу, которая создает программу.
o> т.е. программа должна создавать ехе-шку , которая потом выполняется.
o> подскажите если кто знает..примеры ссылки для начала.
o> в общем нужно направление мысли задать!
Направление 1.
Твоя программа формирует код на каком-либо языке, а потом вызывает
компилятор того языка.
Направление 2.
Пишишь интерпретатор, а потом формируешь файл, в которой втискиваешь
интерпретатор и код программы, которую надо выполнить (типа SFX-архива)
Направление 3.
Изучить структуру EXE или COM и написать компилятор :)
Афоризм напоследок: Жизнь нужно прожить так, чтобы Боги в восторге предложили
еще одну.
Winamp глаголит: DR. ALBAN IT'S MY LIFE
8 июня 2005 г. 19:18:55
Просто студент
Eugene mailto:rav***@o*****.ru
Номер выпуска : 4590
Возраст листа : 626 (дней)
Количество подписчиков : 527
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/381107
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru
