Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
0 / 0 / 0
Регистрация: 08.04.2015
Сообщений: 9
Другое

Не работают альфаскины на другом пк

11.11.2015, 13:06. Показов 1247. Ответов 9
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Народ помогите пожалуйста!
Ситуация такая дома подключил denver, delphi 7 написал базу в MySQL и поставил альфаскины, все работает все прекрасно, но как только вставляю флэшку в колледже и хочу переподключить базу на хост колледжа, т.к там не работает localhost, то скины сразу перестают работать, мне посоветовали сделать ручное подключение к базе, т.е на форме вводить в edit host, пароль, логин и базу, которую подключаем. я начал делать и завис. Вот что я сделал, но проверку введены ли значения и есть ли такая база сделать не могу. Через 2 дня защита выручайте)
Delphi
1
2
3
DataModule1.ADOConnection1.Connected:=false;
DataModule1.ADOConnection1.ConnectionString:=';Extended Properties=DRIVER={MySQL ODBC 5.1 Driver};UID='+Edit2.Text + 'PWD=' + Edit3.Text +'TSERVER='+ Edit1.Text + 'DATABASE='+ Edit4.Text +' PORT=3306' + 'COLUMN_SIZE_S32=1;" ';
DataModule1.ADOConnection1.Connected:=true;
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
11.11.2015, 13:06
Ответы с готовыми решениями:

Альфаскины. Кнопки
Всем привет. Я поставил себе скин из альфаскинс. Там вообщем кнопки мигают, когда на них мышкой наводишь. А когда нажимаешь на кнопку, то...

Самодельные альфаскины в делфи
В общем скинов много, да! Но я хочу сделать самодельный. Раньшн натыкался на билдер скинов, но не могу сейчас найти. Подскажите...

Альфаскины: избавиться от навязчивой таблички
Здравствуйте, как при использовании бесплатных альфаскинов Альфа избавиться от навязчивой таблички при запуске программы. Там пишется...

9
5975 / 4550 / 1095
Регистрация: 29.08.2013
Сообщений: 28,172
Записей в блоге: 3
11.11.2015, 15:45
Лучший ответ Сообщение было отмечено Dollar как решение

Решение

Цитата Сообщение от Dollar Посмотреть сообщение
но проверку введены ли значения
вот проверка эдитов
Delphi
1
if Edit1.Text<>'' then Showmessage('Эдит1 пуст')
Цитата Сообщение от Dollar Посмотреть сообщение
есть ли такая база сделать не могу
Delphi
1
2
3
4
5
6
try
 DataModule1.ADOConnection1.Connected:=true;
except
 // тут обработка ошибок при подключении
 showmrssage('Ошибка при подключении');
end
как-то так. а почему Localhost не работает? везде должен работать
1
3530 / 2270 / 279
Регистрация: 24.12.2010
Сообщений: 13,723
11.11.2015, 15:54
бред какой-то ..

какое отношение альфаконтролы и прочая визуальная хрень имеют к ADOConnection ?
Вообще никакого - в огороде бузина, а в Киеве дядько..

Не по теме:

Все в одну кучу замесил.. Защита на носу, а он ни в зуб ногой где что как зачем и почему у него в программе творится

1
0 / 0 / 0
Регистрация: 08.04.2015
Сообщений: 9
11.11.2015, 19:42  [ТС]
не работает, потому что в коллледже своя сеть и там у них хост 10.10.1...., при localhost он просто выдаст ошибку в подключении.

Добавлено через 3 минуты
спасибо за помощь, буду пытаться )
0
5975 / 4550 / 1095
Регистрация: 29.08.2013
Сообщений: 28,172
Записей в блоге: 3
11.11.2015, 20:14
Dollar, localhost всегда указывает на локальный компьютер
0
Эксперт Pascal/Delphi
 Аватар для xxbesoxx
1135 / 616 / 129
Регистрация: 13.02.2009
Сообщений: 3,602
13.11.2015, 20:20
Цитата Сообщение от qwertehok Посмотреть сообщение
вот проверка эдитов
Delphi
1
if Edit1.Text<>'' then Showmessage('Эдит1 пуст')
Ну, Ну... проверка эдитов да ? пользователь нажал пробел и ЧТО будет на ваши проверке ?

Добавлено через 8 минут
Цитата Сообщение от qwertehok Посмотреть сообщение
Delphi
1
2
3
4
5
6
try
 DataModule1.ADOConnection1.Connected:=true;
except
 // тут обработка ошибок при подключении
 showmrssage('Ошибка при подключении');
end
как-то так. а почему Localhost не работает? везде должен работать
1. Причем тут ваши код ?
2. Может на Localhost поставил пароль или заменил , или в общем в службе MySQL не запущен . Такого не должен ?
0
Эксперт Pascal/Delphi
 Аватар для xxbesoxx
1135 / 616 / 129
Регистрация: 13.02.2009
Сообщений: 3,602
13.11.2015, 20:35
Лучший ответ Сообщение было отмечено northener как решение

Решение

Цитата Сообщение от Dollar Посмотреть сообщение
то скины сразу перестают работать
Вот здесь тоже надо тот скин добавить который вы выбрали из SkinName потом перекомпилируем проект что это Skin работал на другом компьютере тоже ... rad studio >= XE уже есть свой Skini
Миниатюры
Не работают альфаскины на другом пк  
0
5975 / 4550 / 1095
Регистрация: 29.08.2013
Сообщений: 28,172
Записей в блоге: 3
13.11.2015, 23:09
Цитата Сообщение от xxbesoxx Посмотреть сообщение
Ну, Ну... проверка эдитов да ? пользователь нажал пробел и ЧТО будет на ваши проверке ?
в эдите будет пробел. а в чем дело?

Цитата Сообщение от xxbesoxx Посмотреть сообщение
Причем тут ваши код ?
не знаю

Цитата Сообщение от xxbesoxx Посмотреть сообщение
Может на Localhost поставил пароль или заменил , или в общем в службе MySQL не запущен . Такого не должен ?
пароль на localhost? это как?
в любом случае нужно ловить исключения драйвера, не самому же проверять все исключительные ситуации

ЗЫ еще раз повторю - не пишите мне в чужих темах
0
Эксперт Pascal/Delphi
 Аватар для xxbesoxx
1135 / 616 / 129
Регистрация: 13.02.2009
Сообщений: 3,602
14.11.2015, 00:44
Цитата Сообщение от qwertehok Посмотреть сообщение
в эдите будет пробел. а в чем дело?
Пишите ваши код на проверке эдитов и потом в Edit е нажмите пробел и будет понятно в чем дело !
Цитата Сообщение от qwertehok Посмотреть сообщение
не знаю
Это и так ясно .
Цитата Сообщение от qwertehok Посмотреть сообщение
пароль на localhost? это как?
Очень просто ...! Вот так Открыть удаленный доступ к базе для всех на #7 смотри ... если книгу не читаешь
Цитата Сообщение от qwertehok Посмотреть сообщение
в любом случае нужно ловить исключения драйвера,
НУ, НУ рассказывайте
Цитата Сообщение от qwertehok Посмотреть сообщение
ЗЫ еще раз повторю - не пишите мне в чужих темах
Ты кто ? и что ты меня повторяешь ? Носишь на форуме бред ... не какой ваши ответ не совпадает а тему . Тебя кто то заставляет ответит на форуме ? изначально изучайте и потом ответите на форуме ....
0
Почетный модератор
 Аватар для Lord_Voodoo
8785 / 2538 / 144
Регистрация: 07.03.2007
Сообщений: 11,873
14.11.2015, 01:15
qwertehok, xxbesoxx, самое главное - прекратите выяснять отношения
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
14.11.2015, 01:15
Помогаю со студенческими работами здесь

Найти сотрудников, у которых непосредственные руководители работают в другом отделе
Для получения доступа к БД необходимо: 1. Запустить Internet Explorer; 2. Зайти по адресу: http://10.12.53.160:5560/isqlplus 3....

Как одному классу узнать о другом в другом файле, если они не имеют общего наследования
Есть два класса в разных файлах, первому классу нужно знать о втором и использовать указатели типа второго у себя внутри, второму нужно...

Кнопки регулировки громкости на клавиатуре иногда не работают и/или работают некорректно
Здравствуйте, у меня возникает некая неполадка/баг со звуком. Пользуюсь я данной клавиатурой, как видно на ней есть 3 кнопки для...

СМА LG WD-80480S не работают исполнительные механизмы, не работают клапана ,мотор,насос
Стиралка LG WD-80480S по включении программы блокирует люк и стоит .Воду не набирает,барабан не крутится,щелкают реле реверса. При...

Не работают задние USB а передние работают как по маслу в чем дело.
Здравствуйте.Включил комп и заметил что не работает принтер подумал что отключил от питания а оказалось что не работают задние usb,передние...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
10
Ответ Создать тему
Новые блоги и статьи
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это дополнительная запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru