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

RusFAQ.ru: Программирование на Delphi


Информационный Канал Subscribe.Ru


RusFAQ.ru: Программирование на Delphi

Выпуск № 123
от 06.01.2003, 20:00

Администратор:
Имя: Калашников О.А.
URL: Информационный ресурс
ICQ: 68951340
Россия, Москва
О рассылке:
Задано вопросов: 403
Отправлено ответов: 775
Активность: 192.3 %
[Задать вопрос >>][Регистрация эксперта >>]
[Поиск в базе][Обсудить на форуме]


 Список экспертов, ответы которых опубликованы в данном выпуске

Idle Sign
Статус: Опытный
Общий рейтинг: 147.54
URL: Blind Team
[Подробней >>]
Vadim
Статус: Опытный
Общий рейтинг: 148.61
[Подробней >>]
Jadd
Статус: Профессиональный
Общий рейтинг: 144.41
[Подробней >>]
 
kvINT
Статус: Профессиональный
Общий рейтинг: 105.95
Телефон: (34316)2-31-45
[Подробней >>]
Артём Шегеда
Статус: Профессиональный
Общий рейтинг: 116.58
URL: Пристанище неодинокого программиста
[Подробней >>]
Necro
Статус: Доверительный
Общий рейтинг: 109.79
[Подробней >>]
 
baldr
Статус: Профессиональный
Общий рейтинг: 113.77
URL: Сайт об ОС DOS. Всем, кто любит эту ОС!
[Подробней >>]
Melkor
Статус: Доверительный
Общий рейтинг: 126.49
[Подробней >>]
Vladimir
Статус: Опытный
Общий рейтинг: 110.5
Телефон: (08242) 43599 40099 раб 41255 дом
[Подробней >>]


 Краткий перечень вопросов

Вопрос № 390. Народ, где можно достать список (более-менее полный) МастДаевых сообщений.... (ответов: 3)
Вопрос № 391. Здравствуйте эксперты. У меня к вам такой вопрос: как привязать окно к верхнему левому углу экрана. ... (ответов: 5)
Вопрос № 392. Здравствуйте, эксперты! Расскажите мне "тёмному" простой способ сделать пинг некой машины ... (ответов: 1)
Вопрос № 393. Здравствуйте ув. Эксперты!!! Как можно сделать чтобы программа сохраняла содержимое Memo1 в файле с... (ответов: 4)
Вопрос № 394. Здравствуйте ув. Эксперты!!! Моя программа должна брать значение из HKEY_CURRENT_USER Softwarednewni... (ответов: 3)
Вопрос № 395. Пытаюсь использовать компоненты dbExpress для доступа к подвешенному MySQL, но получаются проблемы :... (ответов: 1)

Вопросов: 6, ответов: 17


 Вопрос № 390

Народ, где можно достать список (более-менее полный) МастДаевых сообщений.



Вопрос отправлен: 02.01.2003, 13:27
Отправитель: X-RayMan (x_rayman@vinnitsa.com)

[Следующий вопрос >>] [Список вопросов]

Отвечает Idle Sign

Доброе время суток, X-RayMan!
===== Pro bono publico, no bloody panico! =====
Пользуйся библиотекой MSDN - http://www.msdn.microsoft.com

Ответ отправлен: 02.01.2003, 16:39
Отправитель: Idle Sign


Отвечает Vadim

Добрый день, X-RayMan!
Ты какие сообщения имел в виду? Эти? (см. приложение)

Приложение:

Ответ отправлен: 02.01.2003, 15:17
Отправитель: Vadim


Отвечает Jadd

Добрый день, X-RayMan!
Какой. Там их тьма. А если еще прикинуть что есть возможность создавать пользовательские сообщения. Короче Platform SDK, MSDN, Help. Больше врядли где нароешь.

Ответ отправлен: 03.01.2003, 01:52
Отправитель: Jadd


 Вопрос № 391

Здравствуйте эксперты. У меня к вам такой вопрос:
как привязать окно к верхнему левому углу экрана.
Чтобы когда программа запускалась окно программы было в левом верхнем углу и чтобы его нельзя было передвинуть.


Приложение:


Вопрос отправлен: 03.01.2003, 06:42
Отправитель: Вячеслав (ova777@inbox.ru)

[Следующий вопрос >>] [Список вопросов]

Отвечает kvINT

Приветствую Вас, Вячеслав!
Чтобы нельзя передвинуть - в свойствах формы Align=Left или Top. Но как сделать в этом случае окно своего размера, а не только заданной ширины (или высоты), не знаю.
А привязать свое окно при запуске - в свойствах формы Left=0, Top=0. Но тогда его можно будет передвигать.

Ответ отправлен: 03.01.2003, 16:05
Отправитель: kvINT


Отвечает Артём Шегеда

Приветствую Вас, Вячеслав!

Всё упирается в Win32 API. Смотри приложение и вникай...

Приложение:

Ответ отправлен: 03.01.2003, 12:11
Отправитель: Артём Шегеда


Отвечает Necro

Приветствую Вас, Вячеслав!
Чтобы бросить в верхний левый угол в Form1.onCreate:
Form1.left := 0;
Form1.top := 0;
А теперь чтобы нельзя было передвинуть(и поменять размер тоже):
в разделе protected описания формы объявляешь:
procedure wmncht(var m:twmnchittest);message wm_nchittest;
И дальше:
Procedure TForm1.wmncht;
begin
inherited;
m.Result := htClient;
end;


Приложение:

Ответ отправлен: 03.01.2003, 12:19
Отправитель: Necro


Отвечает Jadd

Приветствую Вас, Вячеслав!
Значит для оставления повер всех окон. Ставишь свойства формы в FormStyle:=fsStayOnTop;
Дальше. Вычислить углы экрана просто. Надо вызвать WinAPI функции GetSystemMetrics(SM_CXSCREEN); GetSystemMetrics(SM_CYSCREEN); для размера экрана или GetDevCaps, но это немного сложнее.
Далее пишешь обработчик OnPaint и в нем постоянно обновляешь положение окна. Можно через OnMouseMove, но надо определять нажатие кнобы. Есть еще функции типа GetWindowPlacement, есть сообщение WM_WINDOWPOSCHANGING. Все в твоих руках. Так что, просто ройся в MSDN и пиши.

Ответ отправлен: 05.01.2003, 02:55
Отправитель: Jadd


Отвечает Vadim

Приветствую Вас, Вячеслав!
Присвоить свойства форме после создания:
Left = 0
Top = 0
Чтобы окно не двигалось Borderstyle="bsNone," тогда не будет заголовка у формы и не за что его двигать.


Ответ отправлен: 05.01.2003, 09:41
Отправитель: Vadim


 Вопрос № 392

Здравствуйте, эксперты!
Расскажите мне "тёмному" простой способ сделать пинг некой машины с IP-адресом хх.хх.хх.хх, для определения налчия этой машины в сети, если это конечно возможно...
Задумка такова, чтоб каждый небольшой промежуток времени происходило сканирование локальной сети и выводился список тех кто есть, а кого нет - для оперативности...



Вопрос отправлен: 03.01.2003, 08:33
Отправитель: TIMON

[Следующий вопрос >>] [Список вопросов]

Отвечает Jadd

Доброе время суток, TIMON!
Есть пример в дельфе, которая делает опрос сети на предмет наличия компа в сети, т.е. получился некий а-ля Browser или Novel Monitor. Ну просто все. Берешь компоненты для PowerSock и можно в поле host писать адрес и пытаться законнектиться. Далее либо ошибку вернет, либо даст точный адрес в сети. Есть другой способ, но он немного сложнее. Как? Копай сам.

Ответ отправлен: 05.01.2003, 02:42
Отправитель: Jadd


 Вопрос № 393

Здравствуйте ув. Эксперты!!!
Как можно сделать чтобы программа сохраняла содержимое Memo1 в файле с
названием даты в DateTimePicker1.
Memo1.Lines.SaveToFile(DateTimePicker1.Format + 'txt');


Приложение:


Вопрос отправлен: 03.01.2003, 10:58
Отправитель: Elvis

[Следующий вопрос >>] [Список вопросов]

Отвечает baldr

Здравствуйте, Elvis!
Var
S:String;
I:Integer;
Begin
S:=DateToStr(DateTimePicker1.Date);
For I:=1 to Length(S) do if (S[I]='.') or (S[I]='/') then S[I]:='_';
S:=S+'.txt';
End;

Вот у тебя и есть файл с именем типа "12_01_2002". Как в него что-то сохранить - это уже мелочи.


Ответ отправлен: 03.01.2003, 23:19
Отправитель: baldr


Отвечает Артём Шегеда

Доброе время суток, Elvis!

Всё очень просто: DateToStr(DateTimePicker1.Date)

Ответ отправлен: 03.01.2003, 12:17
Отправитель: Артём Шегеда


Отвечает Jadd

Доброе время суток, Elvis!
var szFileName: String;
begin
szFileName:= FormatDateTime('ddmmyyyy', DateTimePicker1.Date);
szFileName:=szFileName + '.txt';
Memo1.Lines.SaveToFile(szFileName);
end;
все.

Ответ отправлен: 05.01.2003, 02:39
Отправитель: Jadd


Отвечает Vadim

Приветствую Вас, Elvis!
Memo1.Lines.SaveToFile(DateToStr(DateTimePicker1.Date)+'.txt') - так будет правильно.
DateTimePicker.Format - это в каком виде будет представлена дата, типа 'ddMMyyyy'.


Ответ отправлен: 05.01.2003, 09:42
Отправитель: Vadim


 Вопрос № 394

Здравствуйте ув. Эксперты!!!
Моя программа должна брать значение из HKEY_CURRENT_USER Softwarednewnikpaswdspas
и если оно равное Edit1.Text то записывать в значение Pas Edit2.Text но она этого делать не собирается!!!
очень надеюсь на вашу помошь, я ещё учусь!!!


Приложение:


Вопрос отправлен: 03.01.2003, 11:01
Отправитель: Elvis

[Следующий вопрос >>] [Список вопросов]

Отвечает Melkor

Добрый день, Elvis!
1 - в строке записи место Edit2 написано Edit1.
RegIni.WriteString('Paswds', 'Pas', Edit1.Text);
2 - Как я понял, здесь что-то записывается в реестр, а для этого лучше использовать TRegistry.

Ответ отправлен: 03.01.2003, 14:24
Отправитель: Melkor


Отвечает Vladimir

Добрый день, Elvis!
Насколько я помню, в реестр ничего не запишется, пока ты не освободишь RegIni
RegIni.Free;


Ответ отправлен: 04.01.2003, 09:24
Отправитель: Vladimir


Отвечает Vadim

Доброе время суток, Elvis!
Попробуй такой код (см. приложение).

Приложение:

Ответ отправлен: 05.01.2003, 09:42
Отправитель: Vadim


 Вопрос № 395

Пытаюсь использовать компоненты dbExpress для доступа к подвешенному MySQL, но получаются проблемы :( Сначала не было LIBMYSQL.dll, но его нашел. Теперь такой вопрос - как мне получить данные с сервера? Настроил SQLConnection, вроде бы все нормально (Successfully Conected), но когда настраиваю SQLTable: указываю SQLConnection, пишу имя таблицы (в IndexName лаже видны поля таблицы), но вот когда пытаюсь ставить Active - True, то вылазиет ошибка - "Access Violation at address 06C68774 in module 'DBEXPMYS.DLL'. Read of address 6C706D65". Что делать? Может быть надо поставить что-то в MasterSource?
Можете вкраце описать, как настривать эти компоненты, для чтения БД, и как работать с SQLQuery?



Вопрос отправлен: 03.01.2003, 11:50
Отправитель: Narh (narh@relcom.kz)

[Следующий вопрос >>] [Список вопросов]

Отвечает Vadim

Здравствуйте, Narh!
Скорее всего, тебе надо для начала установить драйвер ODBC для MySQL, его можно взять на www.mysql.com.
Далее, создать в BDE(или ODBC)-администраторе источник данных с указанием на сервер MySQL и только после этого спокойно пользоваться dbExpress'ом.


Ответ отправлен: 05.01.2003, 09:41
Отправитель: Vadim



Форма отправки вопроса

Внимание!
Форма может работать некорректно в почтовых программах "Microsoft Outlook" и "Microsoft Outlook Express". В программе The Bat! подобные формы не работают вообще!
После нажатия на кнопку "Отправить", будет открыто второе окно. Заметьте, что в некоторых браузерах могут стоять запреты на открытие других окон, а также "чрезмерное" кэширование данных, при этом факт отправки Вашего вопроса стоит под сомнением.
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+ или отправлять вопросы с сайта по адресу: http://rusfaq.ru/cgi-bin/Message.cgi.

© 2002 Команда RusFAQ.ru.

 Персональные данные

Ваше имя:

Ваш e-mail:

Опубликовать мой e-mail в рассылке


 Вопрос и дополнение

Ваш вопрос:


Приложение (если необходимо):


Получить ответов:


 Выбор рассылки

Программисту
Assembler (38)
C / C++ (29)
Perl (4)
Delphi (21)
Pascal (23)
Basic / VBA (12)
Java / JavaScript (7)
PHP (3)
MySQL / MSSQL (5)
Пользователю
Windows 95/98/Me (35)
Windows NT/2000/XP (25)
"Железо" (32)
Поиск информации (17)
Администратору
Windows NT/2000/XP (10)
Linux / Unix (15)
Юристу
Гражданское право (7)
Семейное право (4)
Трудовое право (4)
КоАП (3)

Отправить вопрос всем экспертам выбранной рассылки.




Яндекс цитирования

© 2002 Россия, Москва. Авторское право: RusFAQ.ru

http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу

В избранное