Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по компонентам для Delphi, C++ Builder 2

Модерирует : ShIvADeSt

ShIvADeSt (20-06-2007 07:33): http://forum.ru-board.com/topic.cgi?forum=33&topic=8529  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 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 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106

   

GTA3

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Vladimir_Pashutin
нет так не катит выдает ошибку
[Error] Unit1.pas(69): Undeclared identifier: 'Edit'

Всего записей: 114 | Зарегистр. 22-07-2004 | Отправлено: 18:15 07-09-2006
Vladimir_Pashutin

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Блин, а как называется твой компонент TEdit?

Всего записей: 70 | Зарегистр. 14-05-2003 | Отправлено: 18:19 07-09-2006
SERGE_BLIZNUK

Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
GTA3
тебе Vladimir_Pashutin дело говорит.
Ты на форму бросил компнент редактирования (Tedit) ?
Имя у него, наверное, не менял?
Тогда исправь на
  ADOTABLE.filter :=' Фамилия= ' + Edit1.Text;
 
и ещё - если поле ввода будет пустое, возможно получите ошибку при фильтрации!
(проверить, что в поле что-то есть можно, например, так:

Код:
 
 if Length( Trim(Edit1.Text) ) >0 then
   ADOTABLE.filter :=' Фамилия= ' + Edit1.Text
 else
  ADOTABLE.filter := '';
 

Всего записей: 2014 | Зарегистр. 12-09-2002 | Отправлено: 20:45 07-09-2006 | Исправлено: SERGE_BLIZNUK, 20:51 07-09-2006
GTA3

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Vladimir_Pashutin
ок я завтра попробую под рукой компилятора нету просто
 
Добавлено:
SERGE_BLIZNUK
а что означает
 
"if Length( Trim"
 

Всего записей: 114 | Зарегистр. 22-07-2004 | Отправлено: 22:17 07-09-2006
Figaro2000

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
GTA3
Ф1 нажимать пробовал? посмотри там описание функции Length и процедуры Trim

Всего записей: 245 | Зарегистр. 24-09-2005 | Отправлено: 22:51 07-09-2006
GTA3

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Figaro2000
help на английском я особенно на нем не рулю

Всего записей: 114 | Зарегистр. 22-07-2004 | Отправлено: 23:04 07-09-2006
SERGE_BLIZNUK

Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
GTA3
да... ты поверь мне, без минимального знания английского ты далеко не уедешь..
ставь словарик на комп, переводи... или бросай программировать )
 
И ещё - это вопросы НЕ по компонентам.
 
теперь отвечу на твои вопросы (добью оффтопик ).
1)

Цитата:
 
На http://www.delphiplus.org  
В разделе Документация|Delphi  
"Файл справки по Object Pascal и Delphi 1 - Delphi 5"  
 
или в разделе Документация | Delphi 5  
"Справка по Delphi 5 и Object Pascal на русском языке версия 5.1"  
 
http://DelphiPlus.org - ежедневные новости информационных технологий  
 

 
2)
 Length ( S : string) : integer -  возращает длину строки  
 Trim(  S : string) : string - возращает строчку с образанными пробелами спереди и сзади.
 
удачи.
 

Всего записей: 2014 | Зарегистр. 12-09-2002 | Отправлено: 06:59 08-09-2006
GTA3

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
SERGE_BLIZNUK
все равно как ты говоришь не получается
 
procedure TForm1.Button4Click(Sender: TObject);
 
begin
 
if Length( Trim(Edit1.Text) ) >0 then
   datamodule2.BookTable.filter :=' Фамилия= ' + Edit1.Text
 else
  datamodule2.BookTable.filter := '';
 
 end;
 
booktable это компонент TADoTable
он находится на другой форме (datamodule2)
сразу скажу что та форма подключена  в разделе uses
 
при выполнении этой процедуры возникает такая вот ошибка
 
"Аргументы имеют неверный тип, выходят за пределы допустимого диапозона или вступают в конфликт друг с другом"
 
 
 
 
 

Всего записей: 114 | Зарегистр. 22-07-2004 | Отправлено: 12:57 08-09-2006
boddy2

Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
мдя.
SERGE_BLIZNUK
может, если есть такое сильное желание помочь, уйдете в приват? Все-таки здесь Вопросы по компонентам ...

Всего записей: 326 | Зарегистр. 27-05-2004 | Отправлено: 13:03 08-09-2006
Vixoid



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
GTA3
А так:
 
procedure TForm1.Button4Click(Sender: TObject);  
 
begin  
 
if Length( Trim(Edit1.Text) ) >0 then  
   datamodule2.BookTable.filter :=' Фамилия LIKE "' + Edit1.Text + '"'
 else  
  datamodule2.BookTable.filter := '';  
 
 end;

Всего записей: 351 | Зарегистр. 16-01-2003 | Отправлено: 13:05 08-09-2006
GTA3

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Vixoid
 
 
а вот так все заработала на УРА
 спасибо всем за помощь)

Всего записей: 114 | Зарегистр. 22-07-2004 | Отправлено: 13:26 08-09-2006
jonikDk



Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
to relictus
 

Цитата:
Может кто знает - есть ли какой компонент/надстройка над Delphi 7, позволяющий делать collapse выбранных функций/процедур? (Достался в наследство чужой проект, в котором весь код находится в одном модуле, более 80.000 строк - задолбало прокручивать! ()  

 
Попробуй вот это EControl Syntax Editor : _hччp://econtrol.ru/download.html
 
Там  и текстовый редактор есть и компоненты. Правда это не в Delphi, а отдельно. но зато функционал который тебе нужен

Всего записей: 1605 | Зарегистр. 01-03-2004 | Отправлено: 17:47 08-09-2006
phi1

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Arvur

Цитата:
Отдельные, не старье и имеющиеся в варезном варианте:  
Storage Library  
LMD StoragePack

Спасибо за информацию. (плохо искал я в свое время, наверное...)
 

Всего записей: 531 | Зарегистр. 19-03-2003 | Отправлено: 22:30 08-09-2006
Sexton

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Наверное, бесполезно спрашивать, но... EurecaLog и madExcept (или может быть Exceptional Magic, SmartInspect, Raize CodeSite, JCL...)? Что же лучше использовать в конечных приложениях для обработки возникающих в приложении ошибок? EurecaLog и madExcept, вроде как, оптимально для этого подходят, так? Но кто же из них, вроде бы, плюсов и минусов примерно поровну?

Всего записей: 142 | Зарегистр. 31-05-2004 | Отправлено: 12:03 10-09-2006
zeroandruxa



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
to relictus
 
Попробуй Castalia http://www.delphi-expert.com/castalia/index.html
там есть удобный просмотрщик списка процедур

Всего записей: 538 | Зарегистр. 02-11-2005 | Отправлено: 16:34 10-09-2006
phi1

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
Попробуй Castalia http://www.delphi-expert.com/castalia/index.html  
там есть удобный просмотрщик списка процедур

Тогда уж лучше посмотреть ModelMaker CodeExplorer, имхо.

Всего записей: 531 | Зарегистр. 19-03-2003 | Отправлено: 22:05 10-09-2006
xy



ХУдератор
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Здравствуйте, подскажите пожалуйста где можно развернуто прочитать про работу нескольких пользователей с одним набором данный
есть ли у dataset стандартный механизм обновления (без полного fetch) или как это можно сделать
 
данная функциональность прекрасно реализована при работе с dbf (клиенты там работают фактически с одним физическим файлом и сразу видят чего менялось), а вот в SQL-архитектуре я натолкнулся на проблемки при одновременном внесении данных

----------
Счастливые мысли приводят к счастливой клеточной биохимии

Всего записей: 10530 | Зарегистр. 28-05-2003 | Отправлено: 15:22 11-09-2006
OXDBA

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
Здравствуйте, подскажите пожалуйста где можно развернуто прочитать про работу нескольких пользователей с одним набором данный

Зависит от СУБД.

Цитата:
есть ли у dataset стандартный механизм обновления (без полного fetch) или как это можно сделать

Для записи по которой прошелся Update - DataSet1.Refresh, для добавленных и удаленных - не разбирался т.к. этих случаях быстро делаю CloseOpen.

Всего записей: 426 | Зарегистр. 19-01-2005 | Отправлено: 18:32 11-09-2006
RedPromo



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
xy
Вобще тогда лучше почитать транзакции и работа иже с ними. Блокировки записей.
И конечно же все завист от СУБД, метод реализации многопользовательской работы.
Обновление в основном через Close Open и востановление позии если важно (хотя быстрым это врядли назовеш).

Всего записей: 558 | Зарегистр. 05-04-2006 | Отправлено: 18:57 11-09-2006
xy



ХУдератор
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
OXDBA

Цитата:
Зависит от СУБД.

Сорри, конечно же имеется ввиду Firebird
хотя и по сути моего вопроса это совершенно не важно, ибо само по себе является проблемой SQL-архитектур
 
RedPromo
Цитата:
Вобще тогда лучше почитать транзакции и работа иже с ними.

спасибо, но на транзакциях я уже собаку съел, да не одну :)
 
проблема в том, что всё бы ничего, да и многие вообще об этом не задумываются, но тут мне как-то показали что вот в dbf как всё классно, и я призадумался - нельзя же прогрессивным SQL-архитектурам уступать на этом поприще ;)
 

Цитата:
Обновление в основном через Close Open и востановление позии если важно (хотя быстрым это врядли назовеш).

такой метод несовместим с быстродействием (например работаем с мегабайтным набором данных в медленной сети, причем для быстродействия делается полный fetch) ;)

----------
Счастливые мысли приводят к счастливой клеточной биохимии

Всего записей: 10530 | Зарегистр. 28-05-2003 | Отправлено: 19:13 11-09-2006
   

Страницы: 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 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по компонентам для Delphi, C++ Builder 2
ShIvADeSt (20-06-2007 07:33): http://forum.ru-board.com/topic.cgi?forum=33&topic=8529


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru