Отправляет email-рассылки с помощью сервиса Sendsay

Мастера DELPHI. Новости мира компонент, FAQ, статьи...

Рассылка закрыта

При закрытии подписчики были переданы в рассылку "Delphi - проблемы и решения" на которую и рекомендуем вам подписаться.

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

←   Февраль 2003   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Автор
Сергей

Статистика

13.577 подписчиков
-18 за неделю
←   Все выпуски   →

Мастера DELPHI. Новости мира компонент, FAQ, статьи...


Информационный Канал Subscribe.Ru
Ежедневная рассылка сайта Мастера DELPHI

DELPHI.mastak.ru

Выпуск от 25.02.03 09:04

Кое-что из нашей кладовки   |x|
  • Vectors kex86 kex@mail.nnov.ru   (25.02.03 02:58)
    Небольшой модуль для работы с векторами на плоскости.
    Обо всем - в ReadMe.
    »»» Скачать: исходные тексты (7кб) демонстрационный EXE файл (7кб)
  • Vectors kex86 kex@mail.nnov.ru   (25.02.03 02:57)
    Небольшой модуль для работы с векторами на плоскости.
    Обо всем - в ReadMe.
    »»» Скачать: исходные тексты (7кб) демонстрационный EXE файл (7кб)
  • DigitEdit WebVadim kvl@roma.zp.ua   (24.02.03 12:22)
    Компонент является наследником класса TEdit.
    Позволяет вводить только данные только в цифровом формате.
    Свойство Digit позволяет вводить в целом или в дробном формате.
    »»» Скачать: исходные тексты
  • Quote on Table v 1.1 BaDeVlad badevlad@hotmail.ru   (24.02.03 14:05)
    Программа меняет тексты на рабочем столе (цитаты, афоризмы и т. п.).
    »»» Скачать: исходные тексты (202кб) демонстрационный EXE файл (202кб) посмотреть скриншот
  • Iron Browser Version 1.03 grei grei@balabanovo.ru   (23.02.03 15:57)
    Решил вложить новую версию проги. Куча новых, новых, новых новшеств. Реальный конкурент для Microsoft Internet Exrlorer.
    Не забудте написать коментарий...
    »»» Скачать: исходные тексты (220кб)
  • Space Word XT 1.12 Alex Petrovsky develop@list.ru   (23.02.03 14:30)
    SpaceWord XT - это дальнейшее развитие SpaceWord'a.
    XT предназначен для создания и редактирования
    Plain text документов. SpaceWord XT может работать со всеми файлами, в которых содержатся текстовые данные. В основном интернет: *.htm, *.html,*.shtml, текстовые: *.txt, конфигурационные: *.cfg, *.ini.
    В SpaceWord XT присутствуют множество дополнительных функций, такие как поддержка шести кодировок: WIN(1251), DOS(866), KOI, IBM, MAC, ISO, ALT и Base64, также присутствует функция автоматического определения кодировок (не всегда помогает), шифровка/дешифровка текста, макросы для работы с регистром текста, макросы для преобразования чисел, преобразование чисел в слова, в валюту, калькулятор, возможность авто сохранения, поддержка шаблонов, макросов и т.п., легкое управление ими и многое другое.
    »»» Скачать: исходные тексты демонстрационный EXE файл
  • Iron Browser Version 1.02 grei grei@balabanovo.ru   (23.02.03 13:18)
    Аналог знаменитого Internet Explorer'а.
    Простая, малозанимающая прога.
    »»» Скачать: исходные тексты (248кб)
  • DigitEdit WebVadim kvl@roma.zp.ua   (24.02.03 12:22)
    Компонент является наследником класса TEdit.
    Позволяет вводить только данные только в цифровом формате.
    Свойство Digit позволяет вводить в целом или в дробном формате.
    »»» Скачать: исходные тексты
  • Obolochka ` frizZ. ` frizz_yan@tut.by   (23.02.03 19:37)
    Оболочка для zhlt.
    »»» Скачать: исходные тексты (285кб) демонстрационный EXE файл (246кб) посмотреть скриншот
Лучшее из нашего FAQ   |x|
Я хочу выполнить SQL-выражение и получить результат в свою переменную, что-то типаSELECT MAV(FieldA) FROM TableB INTO :VariableC;
Вам не нужно использовать оператор INTO для программного доступа к результату - его можно получить используя свойства Fields или FieldByName соответствующего компонента TQuery.
TQuery1.Add(' SELECT MAX(FiledA) FROM TableB ');
TQuery.Open;
...
VariableC := TQuery1.Fields[0];
Или, если результат нужно визуально отобразить, достаточно подключить к используемому TQuery компоненты TDataSource и TDBText.

Комментарий от "Alex Onezashvili" (ao@ti.net.ge)

ПРИСЫЛАЮ ФУНКЦИЮ ТОЛЬКО ОНА В BDE

Входные параметры понятны интуитивно если Database отсутсвует функция открывает локальную директорию и читает dbf-файлы из нее

function GetQueryValue(DtBase:TDataBase;SQL: string;
DataBasename:string='';IbUser:string='';IbPass:string=''):Variant;
var
  Props: CURProps;
  HCursor: hDBICur;
  BlobIndex:Word;
  iRecCount:Integer;

 hTmpDb: hDBIDB;
  pRecBuf:pBYTE;
  Dest:String;  pFlds: pFLDDesc;
  begin
  if (DataBasename='') and (DtBase<>nil) then
  hTmpDb:=DtBase.Handle else
  hTmpDb:=fDbiOpenDatabase(DataBasename,IbUser,IbPass);
Check(DbiQExecDirect(hTmpDb, qrylangSQL, Pchar(SQL), @HCursor));
Check(DbiGetExactRecordCount(hCursor,iRecCount));
if iRecCount<1 then Exit;
  Check(DbiSetToBegin(HCursor));
  Check(DbiGetCursorProps(HCursor, Props));
  pRecBuf := AllocMem(Props.iRecBufSize * sizeof(BYTE));
  pFlds := AllocMem(Props.iFields * sizeof(FLDDesc));
  Check(DbiGetNextRecord(HCursor, dbiNOLOCK, pRecBuf, nil));
  Check(DbiGetFieldDescs(hCursor, pFlds));

  if pFlds.iFldType=fldBLOB then
  begin
  BlobIndex:=0;
  fmDbiGetBlob(hCursor,pRecBuf,BlobIndex,Dest);
  Result:=Dest;

 end
  else
  Result:=fDbiGetField(!
HCursor,1);
  DbiCloseCursor(HCursor);
  end;

»»» Прислать свои комментарии

Обсуждается в конференциях   |x|
У нас большой выбор статей   |x|
Программирование Интернет приложений в Borland Kylix. Часть I. Создай своих демонов!
В этой статье речь пойдет о создании интернет серверов (сетевых демонов) в Linux при помощи среды разработки Kylix и входящего в нее набора компонентов Internet Direct. В качестве примера описывается разработка простого сервера протокола HTTP.
Новинки книжного рынка   |x|
Delphi 6 в подлиннике
Delphi 6 - новая версия популярной системы быстрой разработки приложений. В книге описываются инструментальные средства среды Delphi 6, приводятся основы языка программирования Object Pascal и рассматриваются компоненты, свойства, методы и события, необходимые для разработки широкого спектра программ. Особое внимание уделяется работе с базами данных. Показывается использование как локальных, так и удаленных баз данных, включая создание многоуровневых информационных систем и публикацию результатов запросов через Интернет. Благодаря большому количеству затронутых тем, подробному изложению и многочисленным примерам книга будет полезна как начинающим, так и опытным программистам.
Автор: Гофман В.
Другие сайты о DELPHI   |x|
Delphi
Конференция по Delphi, нетривиальные вопросы и доходчивые ответы, и не только от братьев по оружию, но и из самого Inprise
» Оценка сайта: 3
Опрос населения :)
Новый журнал для программистов "RSDN Magazine". За какую сумму вы готовы его покупать?
»»» 80р.
»»» 100р.
»»» 120р.
»»» 150р.
Журнал "RSDN Magazine"  |x|

Дорогие друзья! Мы рады представить вам новый совместный проект сайтов www.rsdn.ru, delphi.mastak.ru и www.optim.ru - профессиональный журнал для программистов RSDN Magazine.
Несомненно, ваше мнение о необходимости такого журнала, содержании рубрик и темах отдельных статей поможет сделать журнал более полезным и интересным. Высказать свое мнение, проголосовать или же подписаться вы можете на сайте. Без вашего участия, нам будет трудно сделать правильный журнал!
На сайте выложен анонс пилотного выпуска журнала, вступительное слово от редакции.

Для души

Хокку дня
Сон
репетиция
смерти.

Афоризмы
Человек сожалеет о потерянных деньгах, но не задумывается о прожитых днях, на которые жизнь его стала короче.......

Фраза дня
Боюсь огорчить, но результаты Вашего вскрытия...

Дурацкие законы (информация предоставлена сайтом kurilka.com)
Во Франции запрещается целоваться на железнодорожных путях.
В Сэнт Луисе (США) запрещается сидеть на мостовой и распивать пиво из ведра.

И на закуску коротенький анекдот
- Вы рождены в законном браке?
- Да, наполовину.
- Наполовину? Как это понять?
- Мой отец был женат, а мать нет.

Фотоприколы.
Начните день с хорошего настроения!
http://delphi.mastak.ru/cgi-bin/prikol.pl?id=6212

На этом позвольте откланяться и пожелать вам удачного дня.
Искренне ваш, Алексей (delphi@mastak.com)

Добро пожаловать на сайт -= Мастера DELPHI =- 
http://subscribe.ru/
E-mail: ask@subscribe.ru 		Отписаться
Убрать рекламу
В избранное