У меня два вопроса: 1 как в Buildere выполнить сриптфайл *.sql 2 Почему кокдая вызываю форму ShowModal(); не могу возвратить параметр mrOk или mrCancel; Пасиба.
Доброе время суток, Toha! О первом - в Builder'е не делал, но по-видиому, с помощью SQL в TQuary. Должен быть пример 2) нужно выполнить во второй форме в каком-нибудь обработчике чего-нибудь: { Form2->ModalResult = mrOk; Form2->Close(); } второе, ессно, не обязательно Ответ отправлен: 04.05.2004, 14:08 Отправитель: Boriss Отвечает samum2000
Приветствую Вас, Toha! 1. Вообще-то Builder не предназначен для выполнения *.sql. Создай файл *.bat (например, как в приложении), помести его в папку bin твоего InterBase сервера и запусти. 2. Form1.ModalResult := mrOK; -------------------------- -=Experts helper: testmode=-
Приложение: Ответ отправлен: 04.05.2004, 18:09 Отправитель: samum2000 Отвечает THE_PRO
Приветствую Вас, Toha! Svoystva ModalResult u knopok i formi! Ответ отправлен: 04.05.2004, 17:03 Отправитель: THE_PRO
Вопрос № 1510
Добрый День,sir henry! >Добрый День! >Подскажите, пожалуйста, почему в CppBuilder не работает следующий код: >{const int SysColor[14]={COLOR_ACTIVEBORDER,COLOR_ACTIVECAPTION, >COLOR_APPWORKSPACE,COLOR_BACKGROUND,COLOR_BTNFACE,COLOR_CAPTIONTEXT, >COLOR_CAPTIONTEXT,COLOR_INACTIVEBORDER,COLOR_INFOTEXT,COLOR_MENU, >COLOR_MENUTEXT,COLOR_WINDOW,COLOR_WINDOWFRAME,COLOR_WINDOWTEXT}; >const TColor ColorArray[11]={clAqua,clBlue,clYellow,clFuchsia,clGreen, >clNavy,clRed,clSilver,clWhite,clSkyBlue}; >SetSysColors(1,SysColor[random(13)], ColorArray[random(10)]);} >Сообщения: >[C++ Warning] Unit1.cpp(21): W8057 Parameter \'Sender\' is never used >[C++ Error] Unit1.cpp(32): E2034 Cannot convert \'const int\' to \'const int *\' >[C++ Error] Unit1.cpp(32): E2342 Type mismatch in parameter \'lpaElements\' (wanted >\'const int *\', got
\'int\') >[C++ Error] Unit1.cpp(32): E2034 Cannot convert \'const TColor\' to \'const unsigned >long *\' >[C++ Error] Unit1.cpp(32): E2342 Type mismatch in parameter \'lpaRgbValues\' (wanted >\'const unsigned long *\', got \'TColor\') >[C++ Warning] Unit1.cpp(33): W8004 \'ColorArray\' is assigned a value that is never >used >[C++ Warning] Unit1.cpp(33): W8004 \'SysColor\' is assigned a value that is never used >[C++ Warning] Unit1.cpp(33): W8057 Parameter \'Sender\' is never used >Вопрос отправлен: 02.05.2004, 21:18 >Отвечает sir henry >Доброе время суток, Марина ! >Дык вед все понятно из сообщений об ошибках :)). >Вот смысловой перевод, если у Вас туговато (как и у меня, впрочем :) с ненашими языками: >[C++ Error] Unit1.cpp(32): E2034 Не могу конвертировать типы констант "просто int" в "указатель на int". >[C++ Error] Unit1.cpp(32):
E2342 То же самое, но уже в параметрах функции. С++ ждет один тип, а Вы ему подсовываете совершенно другой. Вот его и вырвало - невкусно :)). >[C++ Error] Unit1.cpp(32): E2034 Опять беда с типами. TColor - это не указатель на беззнаковое целое. >[C++ Error] Unit1.cpp(32): E2342 То же в функции. >-------------- >На Warning (Предупреждения) можно наплеывать. По крайней мере, пока Вы не начали оптимизировать программу. Спасибо за ответ. Чесно говоря, смысл Сообщений об ошибках я понимала, но не знала, что с ними делать... Может быть вы сможете ответить на еще один вопрос? Текст продцедуры я взяла из книги "Программирование в Delphi глазами хакера", так вот, там массив ColorArray это массив TColor? И еще если не ошибаюсьв Delphi в функцию передаются параметры по значению, тогда почему в СppBuilder они передаются в те же API-функции по ссылке(т.е. если я не ошибаюсь
функции те же?)? Спасибо...
Здравствуйте, Марина! Однако, милая барышня, либо Вы путаете, либо я торможу. В Вашем вопросе ясно написано, что работает компилятор С++. Вы же пишите, что программируете на DElphi :). Дело в том, что в С++ и в Delphi, в функции WinAPI параметры передаются по разному. С++ в основном работает с указателями типов, Delphi же с обычными типами. Приведу пример: Delphi function WriteFileEx( hFile: THandle; lpBuffer: Pointer; nNumberOfBytesToWrite: DWORD; const lpOverlapped: TOverlapped; lpCompletionRoutine: FARPROC): BOOL; stdcall; ----------- C++ WriteFileEx( IN HANDLE hFile, IN LPCVOID lpBuffer, IN DWORD nNumberOfBytesToWrite, IN LPOVERLAPPED lpOverlapped, IN LPOVERLAPPED_COMPLETION_ROUTINE lpCompletionRoutine ); ---------- Почувствуйте разницу :), а именно параметр lpOverlapped. В Delphi
это тип-запись (или структура в С++), а в С++ - это указатель на структуру (или указатель на запись в Delphi). :) Ответ отправлен: 04.05.2004, 14:51 Отправитель: sir henry
Вопрос № 1511
Здравствуйте ,эксперты .Помогите как в Delphi сделать появление моей формы более красивой: я имею в виду сделать так , чтобы форма допустим появлялась по кирпичикам слева направо по диагонали - как заставка ,или при закрытии формы она свёртывается или складываеться в двое(или ещё как-нибудь) ,а не просто закрываеться .Что-нибудь в этом духе(очень хотелось бы по спирали чтобы ,но а так хотя бы принцип уловить, чтобы на примеры самом простом самому попробовать что-то своё сделать). Спасибо , Victor aka Seiphirot.
Здравствуйте, Seiphirot! Попробуйте использовать регеоны, на мой взгляд это самый красивый вариант. Если нужно подробней - пишите. Ответ отправлен: 03.05.2004, 20:46 Отправитель: Pawel Отвечает --- Нет данных ---
Добрый день, Seiphirot! NFSU - играть надо а не хуйнёй заниматься понял ты бля мудак ебаный, не пиши сюда никогда а на сайте я регистранулся просто чтоб проги брать задрюченный уродливый гоблин.ШЛЮХА!!!
Ответ отправлен: 03.05.2004, 17:37 Отправитель: --- Нет данных --- Отвечает Boriss
Добрый день, Seiphirot! Описывать долго -> посмотрите статью Яна Валерьевича "Красота - это страшная сила" http://www.delphimaster.ru/articles/grad/index.html Ответ отправлен: 04.05.2004, 12:43 Отправитель: Boriss
Вопрос № 1512
Уважаемые эксперты подскажите присутствуют в переменной TStrings символы #11,#13(если присутствуют ,то где) или в этой переменной (массиве строк(Tstrings)) в каждом 0-ом байте содержится длина каждой строки.
Здравствуйте, Doc! это жеиз паскаля известно, кажись этоозначает конец строки()точно не скажу, но кажись так) Ответ отправлен: 03.05.2004, 21:46 Отправитель: futility Отвечает samum2000
Здравствуйте, Doc! В переменной типа TStrings могут присутствовать эти символы. Они будут входить в состав массива строк Strings (это одно из полей класса TStrings). Однако, из вопроса я понял, что выпутаете некоторые понятия. Существуют так называемые Паскаль-строки (где в нулевом символе содержится длинна строки, поэтому длинна строки ограничена 255-ю символами) и Си-строки (где конец строки определяется специфическим символом - это #0, а не #10 и #13). Последовательность же символов #13#10 определяет не конец строки в памяти, а конец строки на бумаге или экране - это символы перевода строки и возврата каретки. -------------------------- -=Experts helper: testmode=- Ответ отправлен: 04.05.2004, 18:09 Отправитель: samum2000 Отвечает Boriss
Добрый день, Doc! Речь, по-видимому, идет о LoadFromFile. Так? Тогда "НЕТ", они будут удалены. Но если самому, то см. в приложении
Приложение: Ответ отправлен: 04.05.2004, 12:50 Отправитель: Boriss Отвечает sir henry
Здравствуйте, Doc! 1. В переменной TStrings они не содержаться. Переменная TSrings - это объект. У сего объекта есть свойство Strings[ ], оно как раз и содержит строки. Вы вообще не знаете, как в строке искать тот или иной символ? Это можно сделать так: Pos('simbol', TStrings.Strings[index]); 2. Длину любой строки в объекте TStrings можно узнать так: Length(TStrings.Strings[index]); Ответ отправлен: 06.05.2004, 04:13 Отправитель: sir henry Отвечает THE_PRO
Уважаемые эксперты подскажите Здесь процедура обработки введённых символов в RichEdit2 Я пытаюсь отследить чтобы каждый введённый символ был такой же как и в RichEdit1,(т.е символы должны быть равны СООТВЕТСТВЕННО) ,а также обновить RichEdit2, при вводе в него символ не порадающего в [#32..#255].подскажите в чёи ошибка. Буду супер благодарен.
Приветствую Вас, Roma! Во-во, и я при попытке разобраться во всех хитросплетениях кода "{?}dec(index_char,... ". 1) здесь кодировка Ansi - в ней принципиально нет управляющих символов (в противоположность OEM) 2) может проще RichEdit2.Lines.Assign(RichEdit1.Lines); ? И не думаю, что это будет намного дольше 3) при попытке вставить управляющие для RichEdit <-> RTF символы, например "/", в "обычном" режиме (PlainText:=False) RichEdit вставляет два. В режиме PlainText:=True; - нет. Связано это с форматом RTF Ответ отправлен: 04.05.2004, 13:02 Отправитель: Boriss
Форма отправки вопроса
Внимание!
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+
или отправлять вопросы с сайта по адресу:
http://rusfaq.ru/cgi-bin/Message.cgi.