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

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

Подписаться Бесплатная «Золотая» новостная рассылка . Подписчиков 3.306 RSS
←   Апрель 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


За последние 60 дней ни разу не выходила


Сайт рассылки: http://rusfaq.ru/
Открыта: 14-03-2002

Автор
Калашников О.А.

Статистика

3.306 подписчиков
0 за неделю
←   Все выпуски   →

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


РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Delphi

Выпуск № 444
от 15.04.2006, 11:05

Администратор:Калашников О.А.
В рассылке:Подписчиков: 305, Экспертов: 67
В номере:Вопросов: 5, Ответов: 10

Вопрос № 39797: Добрый день ! Вопрос таков ! Как изменять или задовать содержимое PansiChar пробовал с помошью Edit вызывает ошибку ! ??? ..
Вопрос № 39809: Доброго времени суток, уважаемые эксперты! Помогите с программной реализацие такой задачи. Есть целое число (которое может меняться). Оно считывается с файла настроек (ini). Это чсло характеризует количество резервных копий, которые будут хра...
Вопрос № 39813: Здравствуйте, эксперты. Я пишу простой чат на Delphi с помощью TTcpServer и TTcpClient. Подскажите, как можно создать список людей, сидящих сейчас в чате. Заранее благодарю!...
Вопрос № 39822: Как найти определитель матрицы с помощью Delphi?...
Вопрос № 39868: Здравствуйте! Как сделать какой-либо компонент прозрачным, желательно с указанием степени прозрачности? И можно ли сделать не однородную прозрачность формы?...

Вопрос № 39.797
Добрый день !
Вопрос таков !
Как изменять или задовать содержимое PansiChar пробовал с помошью
Edit вызывает ошибку !
???
Отправлен: 09.04.2006, 13:56
Вопрос задал: Tamashev Denis M (статус: 2-ой класс)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 2)
Отвечает: Ерёмин Андрей
Здравствуйте, Tamashev Denis M!
Не совсем понятен вопрос... Если вы имеете ввиду запись значения в переменную типа PAnsiChar из переменной типа String, то это делается так:

procedure TForm1.Button1Click(Sender: TObject);
var Str: PAnsiChar; Text: String;
begin
Text:='123';
Str:=PAnsiChar(Text);
end;


---------
Нет правила без исключений. Правило без исключений - исключение из правил.
Ответ отправил: Ерёмин Андрей (статус: Профессор)
Россия, Тула
WWW: Программирование на DELPHI: Всё для программиста.
ICQ: 286837644
----
Ответ отправлен: 09.04.2006, 14:06
Оценка за ответ: 5
Отвечает: Denisss

Здравствуйте, Tamashev Denis M!

1. Всюду, где нужен PansiChar, а есть String ставьте PChar(...);

  WindowName:= FindWindow(nil, PChar(WindowTitle));

2. Не нада так каверкать русский язык! задОвать - это, как я понимаю, не от слова "задавать", а от другого слова образовано!
Ответ отправил: Denisss (статус: Специалист)
Ответ отправлен: 09.04.2006, 14:33
Оценка за ответ: 5
Комментарий оценки:
8)
Sorry !
Но вариант:
Text:='123';
Str:=PAnsiChar(Text);
Ерёмина Андрея
Мне больше по душе !

Вопрос № 39.809
Доброго времени суток, уважаемые эксперты!
Помогите с программной реализацие такой задачи.
Есть целое число (которое может меняться). Оно считывается с файла настроек (ini). Это чсло характеризует количество резервных копий, которые будут храниться на диске. то есть, если число равно 3, то и будет 3 резервных копии.
Теперь задача: Предположим, что число резервых копий 3. Мне нужно проверить наличие этих каталогов, самый старый (в данном случае с номером 3) удалить, каталог с номером 2 переименовать в номер 3, номер 1 в номер 2, а затем создать новый каталог с номером 1 и скопировать туда необходимые файлы.
Приветствуются все идеи.
За ранее ОГРОМНОЕ спасибо!
С ув. Дмитрий.
Отправлен: 09.04.2006, 18:13
Вопрос задал: Mrdimon (статус: 1-ый класс)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 1)
Отвечает: Устинов Сергей Евгеньевич
Здравствуйте, Mrdimon!

Решение в приложении.
Надеюсь помог.

Приложение:

Ответ отправил: Устинов Сергей Евгеньевич (статус: 3-ий класс)
Ответ отправлен: 09.04.2006, 19:48
Оценка за ответ: 4

Вопрос № 39.813
Здравствуйте, эксперты.
Я пишу простой чат на Delphi с помощью TTcpServer и TTcpClient.
Подскажите, как можно создать список людей, сидящих сейчас в чате.
Заранее благодарю!
Отправлен: 09.04.2006, 18:41
Вопрос задал: Томша Павел (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Bochvarov NikB
Здравствуйте, Томша Павел!
TTcpServer.Socket.Connections: ето все клиентьи, которие связаньи с сервером.
Если тебе список нужен в клиентов - надо послать из сервера.
Ответ отправил: Bochvarov NikB (статус: 7-ой класс)
Ответ отправлен: 09.04.2006, 20:58
Оценка за ответ: 5
Отвечает: shegeda
Здравствуйте, Томша Павел!

Обычный метод - это отправка имени клиента на сервер сразу при подключении. На сервере список клиентов привязывается к соединениям и в любой момент времени можно узнать ники всех участников чата. Рекомендую к прочтению:
  TServerWinSocket.ActiveConnections
  TServerWinSocket.Connections
  TServerWinSocket.Data
Последнее свойство можно использвать вообще на своё усмотрение - хоть выделяй память при регистрации ника и указатель заноси в Socket.Data. Не забудь только при закрытии сокета память освободить
Ответ отправил: shegeda (статус: 5-ый класс)
Ответ отправлен: 10.04.2006, 02:01
Оценка за ответ: 5

Вопрос № 39.822
Как найти определитель матрицы с помощью Delphi?
Отправлен: 09.04.2006, 19:34
Вопрос задал: Иванов Михаил Викторович (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 1)
Отвечает: Рубан Николай Николаевич
Здравствуйте, Иванов Михаил Викторович!

Вот кусочки приложения которое я разработал для неродивых студетнтов физ-мата СГПУ
Детерминант находиться с использованием метода Гаусса (так как рекурсивное нахождение минор может повлести за собой переполнение стека при достаточно большом порядке матрицы!!!)

В проекте используется процедура Sorted которая преобразовывает матрицу к ступенчитому виду (т.е. если в ходе гауссовых преобразований на главной диагонили получился НОЛЬ то пробуем изменить порядок строк)

За более детальной информаций (например нахождение обратной матрицы, умножение матриц) пишите на ghostik_lab@mail.ru

Приложение:

---------
Мыслю - занчит существую (Декарт)

Ответ отправил: Рубан Николай Николаевич (статус: 2-ой класс)
Ответ отправлен: 10.04.2006, 12:15
Отвечает: Diman_A
Здравствуйте, Иванов Михаил Викторович!
Вот хорошая статья для работы с матрицами:
http://delphiworld.narod.ru/base/matrix_in_delphi.html
P.S. Детерминант матрицы - то же самое, что и определитель. (в статье найдешь)
Ответ отправил: Diman_A (статус: 8-ой класс)
Ответ отправлен: 10.04.2006, 13:55

Вопрос № 39.868
Здравствуйте! Как сделать какой-либо компонент прозрачным, желательно с указанием степени прозрачности? И можно ли сделать не однородную прозрачность формы?
Отправлен: 10.04.2006, 10:34
Вопрос задал: 007Makc (статус: Посетитель)
Всего ответов: 3
Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Проходящий Мимо
Здравствуйте, 007Makc!
Насколько мне известно, стандартными методами можно только сделать прозрачной только форму вместе со всеми компонентами:
Form1.AlphaBlendValue:=150;
Form1.AlphaBlend:=true;
То же касается однородной прозрачности формы. Попробуйте использовать внешние скин-компоненты
---------
Carpe diem!
Ответ отправил: Проходящий Мимо (статус: 2-ой класс)
Ответ отправлен: 10.04.2006, 11:33
Отвечает: Lexus
Здравствуйте, 007Makc!

Для создания прозрачности отдельных элементов (да и вообще они хорошие!) попробуйте использовать компоненты ksdev SkinEngine. Рекомендую
Ответ отправил: Lexus (статус: 2-ой класс)
Ответ отправлен: 10.04.2006, 12:38
Отвечает: Ерёмин Андрей
Здравствуйте, 007Makc!
Стандартные компоненты сделать полупрозрачными не получится. Можно только всю форму целиком. За это отвечают свойства формы AlphaBlend (поставить в True) и AlphaBlendValue - степерь прозрачности. Также есть свойства TransparentColor и TransparentColorValue - если первое установить в True, а во втором указать, например, чёрный цвет, то все точки в пределах формы (независимо, форма это или здесь компонент находится) с этим цветом будут прозрачными. Однако оба метода ненадёжны и, как правило, не работают в Win98 или могут сопровождаться ошибками. Конечно, это не всегда так и всё может работать нормально. По поводу отдельных компонент - это уже нужно искать, т.к. вещь специфическая. Рекомендую посмотреть RzComponetns, AlphaSkins, SkinEngine, ThemeEngine и JediVCL. Возможно, какие-нибудь из них вам приглянутся.
---------
Нет правила без исключений. Правило без исключений - исключение из правил.
Ответ отправил: Ерёмин Андрей (статус: Профессор)
Россия, Тула
WWW: Программирование на DELPHI: Всё для программиста.
ICQ: 286837644
----
Ответ отправлен: 10.04.2006, 15:40

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

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

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!
Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.

© 2001-2006, Портал RusFAQ.ru, Россия, Москва.
Идея, дизайн, программирование: Калашников О.А.
Email: adm@rusfaq.ru, Тел.: +7 (926) 535-23-31
Авторские права | Реклама на портале
Версия системы: 4.30 (beta) от 09.04.2006 		Яндекс Rambler's Top100
В избранное