Delphi заготовки

программа на Паскале (pascal)

Из данного предложения вычеркнуть слова, содержащие заданную букву.

uses crt;
const
   SymbolWord :set of char = ['A'..'Z','a'..'z','0'..'9','а'..'я','А'..'Я','-'];

   Function GetTextFromUslovie(s:string;Charvalue:Char):string;
   var x:integer;
       s2:string;
       L:integer;
       start:integer;
       chr:boolean;
   begin
     s2:='';
     l:=length(s);
     start:=1; // начала слова
     chr:=true;
     while x<l do begin
        if s[x] in SymbolWord then begin
        if s[x]=Charvalue then chr:=false;
        s2: ... Читать дальше »

где найти файл fbclient.dll
где найти файл fbguard.exe
где найти файл fbrmclib.dll
где найти файл fbsvcmgr.exe
где найти файл fbtracemgr.exe
где найти файл fb_lock_print.exe
где найти файл gbak.exe
где найти файл gdef.exe
где найти файл gfix.exe
где найти файл gpre.exe
где найти файл gsec.exe
где найти файл gsplit.exe
где найти файл gstat.exe
где найти файл ib_util.dll
где найти файл icudt30.dll
где найти файл icuin30.dll
где найти файл icuuc30.dll
где найти файл instclient.exe
где найти файл instreg.exe
где взять файл instsvc.exe
где взять файл isql.exe
где взять файл nbackup.exe
где взять файл qli.exe
Где взять gfix.exe

/Fb_ut.zip

Как получить полный текст процедуры из базы данных FireBird


начало этого разговора было положено в конференциях
http://www.sql.ru/forum/actualthread.aspx?tid=901951
отдельное спасибо  автору сайта  ibase.ru
Источник http://www.ibase.ru/devinfo/sysqry.htm

1. Получение списка полей и их типов по таблицам:

select R.RDB$RELATION_NAME, R.RDB$FIELD_POSITION, R.RDB$FIELD_NAME,
F.RDB$FIELD_LENGTH, F.RDB$FIELD_TYPE, F.RDB$FIELD_SCALE, F.RDB$FIELD_SUB_TYPE
from RDB$FIELDS F, RDB$RELATION_FIELDS R
where F.RDB$FIELD_NAME = R.RDB$FIELD_SOURCE and < ... Читать дальше »