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

СообЧа (СООБщество ЧАйников). Обмен опытом, вопросы, ответы. 11.04.03


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

***СООБщество ЧАйников***

Система Эксперт
Найдем ответ СообЧа!


11.04.03



Свежие FAQ на SoobCha.Ru


FAQ от системы Эксперт


Вопросы от системы Эксперт


FAQ от системы Эксперт
Тема: Games

Как в 4-м уровне Hitman 2, после спасения агента, взорвать стену и пройти в канализацию?


Ответ:

В начале миссии говорится про ящик в котором лежат пистолет, ночное видение, бомба и т.д. Надо поискать этот ящик со значком хитмана, как найдёшь прикрепляй бомбу на стенку и отбегай вместе с агентом.

[Наверх]

Тема: Local_Net

При включенном Outpost Firewall локалка отказывается работать - компьютер не видит соседа. В чём трабл?


Ответ:

В фаерволе создай правило для обмена с соседом (запиши его айпи в "зеленый" список

[Наверх]

Тема: Multimedia

Какой МР3 кодек лучше использовать для кодирования?


Ответ:

Blade или Lame.Субъективно - у Lame звук помягче. Фраунгофер на высоких битретах дает какой-то "картонный" призвук - но это опять-таки субъективно. На низких битрейтах (меньше 100кбпс) - все звучит просто ужасно - неважно чем кодировать.
А вообще - лучше скачайте себе все эти кодеки и проверьте сами, именно из-за субъективности восприятия.
http://www2.arnes.si/~mmilut - Blade
http://www.mp3dev.org/mp3 - Lame
http://www.ukr.net/~shafff/ru/cdex.html - Fraunhofer
http://www.cdex.n3.net/ - , лучшая программа для грабления дисков и кодирования с МП3 (и не только).Будет работать со всеми кодеками.

[Наверх]

Тема: WEB_DESIGN

Не подскажете, как сделать ячейку таблицы ссылкой (без графики), чтобы при наведении указателя мыши на ячейку, background-цвет ячейки менялся на заданный цвет. Мой хостинг-сервер поддерживает только CGI и PHP скрипты.


Ответ:

Динамическое изменение цвета фона ячеек
Использование стилей и управление ими с помощью JavaScript позволяет менять вид ячейки "на ходу", при выполнении определенных условий, таких как наведение курсора на ссылку или саму ячейку.
Можешь не боятся, твой сервер это держит.
Рассмотрим самый простой прием - цвет фона ячейки меняется, когда курсор мыши наводится на нее.
Наведение мыши на область отслеживается событием onMouseOver, а вывод мыши за ее пределы - событием onMouseOut. Поскольку цвет фона меняется у той же самой ячейки, на которую наводим курсор мыши, то изменение стиля делается с помощью метода this.style.ba
ckground.
Пример 1. Изменение цвета фона
<table width=60% border=1 cellspacing=0 cellpadding=4 bordercolor=#333333 align=center>
<tr>
<td align=center bgcolor=#CCCCCC onMouseOver="this.style.background='#FFCC33'" onMouseOut="this.style.background='#CCCCCC'"><a href="link1.htm">Пункт 1</a></td>
<td align=center bgcolor=#CCCCCC><a href="link2.htm">Пункт 2</a></td>
</tr>
</table>
В примере используется изменение серого цвета фона на оранжевый.В браузере Netscape 4.x приведенный способ не работает.
Можно, также, сделать переход на другой документ при нажатии не на саму ссылку, а на ячейку таблицы. Тогда вся ячейка превратится в одну ссылку, а не только текст внутри нее. Надо отметить, что данный подход не самый лучший, в силу его неочевидности, пос
етители веб-сайтов привыкли, что при наведении на ссылку, курсор мыши превращается в руку. С помощью CSS можно переопределить вид курсора мыши, однако эта возможность доступна только для браузера Internet Explorer.
Пример 2. Создание ячейки как ссылки
<table width=60% border=1 cellspacing=0 cellpadding=4 bordercolor=#333333 align=center>
<tr>
<td align=center bgcolor=#CCCCCC onMouseOver="this.style.background='#FFCC33'" onMouseOut="this.style.background='#CCCCCC'" onClick="document.location='1.html'" style="cursor: hand"><a href="link1.htm">Пункт 1</a></td>
<td align=center bgcolor=#CCCCCC><a href="link2.htm">Пункт 2</a></td>
</tr>
</table>
К коду HTML предыдущего примера добавилось событие onClick, отвечающее за нажатие на ячейке и изменение стиля курсора.
Чтобы цвет ячейки изменялся лишь при наведении на ссылку внутри нее, следует обращаться к свойствам ячейки через ее имя. Дабы программа знала, свойства какой ячейки изменять, используется параметр ID, уникальным образом определяющим элемент.
Для удобства, изменение цвета ячейки оформлено в виде отдельных функций. В связи с тем, что браузеры Internet Explorer и Opera используют разные подходы для динамического изменения стиля элемента, в функциях, которые приведены в примере 3, цвет фона меня
ется двумя способами. Каждый браузер выберет для себя подходящую строку, а оставшаяся будет проигнорирована.
Пример 3. Изменение свойств ячейки
<table width=60% border=1 cellspacing=0 cellpadding=4 bordercolor=#333333 align=center>
<tr>
<td align=center bgcolor="#CCCCCC" ID="c1"><a href="link1.htm" onMouseOver="newColor('c1')" onMouseOut="backColor('c1')">Пункт
1</a></td>
<td align=center bgcolor="#CCCCCC" ID="c2"><a href="link2.htm" onMouseOver="newColor('c2')" onMouseOut="backColor('c2')">Пункт
2</a></td>
</tr>
</table>
<script language="JavaScript">
function newColor(idCell) { eval('document.all.'+idCell+'.style.background = "#FFCC33"');
eval('document.getElementById("' + idCell + '").style.background = "#FFCC33"');
}
function backColor(idCell) { eval('document.all.'+idCell+'.style.background = "#CCCCCC"');
eval('document.getElementById("' + idCell + '").style.background = "#CCCCCC"');
}
</script>
Ниже показано, как изменяется цвет фона ячейки при наведении курсора на ссылку.
Указанным в примере 3 способом можно изменять цвет любой ячейки, независимо от того, где она расположена. Наведите курсор на ссылку и внизу нее появится цветной прямоугольник.
Текст скрипта в этом случае останется неизменным, как указано в примере 3. Добавятся лишь идентификаторы ячеек, цвет которых следует менять и, соответственно, параметры вызова функций.

[Наверх]

Вопросы от системы Эксперт
Тема: ASP

Я видел на одном из сайтов, сделанном на narod.ru, такую функцию, чтобы можно было бы создать почтовый ящик, могу ли я создать свой почтовый ящик, на своем сайте (www.xakep102.narod.ru), хотябы чтобы только я им мог бользоваться, чтобы его можно было бы прописать в Microsoft Outlook Express, и желательно, что бы он был в домене .com
Ответить: mailto:expert@soobcha.ru?subject=Rass_URN39CM23M
[Наверх]

Тема: BCB

Нужно заблокировать Windows, оставив доступным только запущенное приложение, как, например, в диалоге ввода логина и пароля при входе в Windows NT/2000, или если поставить пароль на заставку. Каким образом можно это сделать ?
Ответить: mailto:expert@soobcha.ru?subject=Rass_URM2YO1R5
[Наверх]

Тема: Local_Net

Бъюсь с самбой (samba 2.2.7) c переменным успехом. Была задача сделать файловый сервер 1C бухгалтерии.., я его впринципе сделал. Юзер видит базу данных, может её читать, может в неё писать, даже русские буквы в имени и прочая фигня работает верно, но! Недавно юзеры стали на всякий случай бэкапить свои базы сами.., и вылез неприятный глюк ( я к своему стыду это не проверил): При копировании файла с сервера (ext3) на юзерскую машину (fat32) юзер получает сообщение об error 1026.
Вобщем, любые файлы читаются и пишутся, но скопировать их нельзя:( В чём дело? Только пожалуйста не посылайте по ссылке с пространным обзором самбы.. И ещё до кучи, как правильно настроить русский в самбе? С клиентов (win98) юзеры видят на сервере русские имена (на сервере cp1251), а с сервера на клиентах имена видны как koi8r.. Это не так важно, но всётаки хотелось бы разобраться. В smb.conf можно настроить только то, что будет видеть клиент, больше параметров нет, ключи smbmount ничего не дали:(
Дистр ALT Linux Master 2.2
Ответить: mailto:expert@soobcha.ru?subject=Rass_URL2BPQT69
[Наверх]

Тема: MailGroups

У меня вопрос по Fidonet. Из списка предложенных тем ни одна, как мне кажется для этого вопроса не подошла, но, пожалуй, эта наиболее близка.
Ребята, подскажите, пожалуйста каким образом я могу подсключится к Fidonet. Я проживаю в Протвино, Московской обл. (около Серпухова). Как мне связаться с местным узлом этой сети. Какие программы нужны для работы, где их взять и как настроить. Сколько мне будет стоить сама связь. Очень прошу ответить поподробнее и поконкретней.
Ответить: mailto:expert@soobcha.ru?subject=Rass_URL59QDI2Y
[Наверх]

Тема: PGP

Как защитить свою прогу, на VBA от переустановки на другую машину?
Ответить: mailto:expert@soobcha.ru?subject=Rass_URL2BPW97U
[Наверх]

Тема: Pascal

прога работает на моем компе и еще на двух других,а на третьем нет никакой реакции.Везде стоит виндюк 98, принтера тоже работают на всех ,а прога только на двух.
В массиве Timers булевые переменные не меняются или меняются хаотично и вместо 255 висит 196 или еще какая нибудь фигня.Подскажите в чем может быть дело,может в виндюке нужно что-то настроить.
uses crt;
var
Timers: Array[1..8] of Boolean;
a,b,i,j: Byte;
procedure SetTimer;
var
k: Byte;
begin
GotoXY(1,1);
for k:=1 to 8 do
if Timers[k] then WriteLn(k,' - Active ')
else WriteLn(k,' - Not active');
end;
begin
clrscr;
SetTimer;
repeat
asm
mov dx,37Ah
in al,dx
or al,32
out dx,al
mov dx,378h
in al,dx
mov a,al
end;
if a<>b then
begin
b:=a;
j:=1;
for i:=1 to 8 do
begin
Timers[i]:=(a or j)=a; ВОТ ЗДЕСЬ ТВОРИТСЯ БАРДАК
j:=j*2;
end;
SetTimer;
end;
until keypressed;
end.
Ответить: mailto:expert@soobcha.ru?subject=Rass_URL2BPA11A
[Наверх]

Тема: SQL

Как правильно написать индекс на текстовое поле?
Пишу: alter table tbl_name add index i_name (field1, field2);
Ругается:
ERROR 1073: BLOB column 'field1' can't be used in key specification with
the used table type
Подскажите так же как ограничить количество символов (первых 100) индексируемого поля. И существует ли команда удаления из таблицы дублирующих записей (из нескольких таблиц)?
И еще: после удаления записей (delete from table_name where ...)остаются совсем пустые записи. Как к ним обращаться? Или вставить в них данные?
Ответить: mailto:expert@soobcha.ru?subject=Rass_URL2BPOS5N
[Наверх]

Тема: Scan

Завёл я в своём доме сканер неизвестной породы. Как и чем его кормить не знаю, так-как подобрал, его бездомного. (т.е. сканер есть, а дров и прочей программной среды к оному НЕТ, только одно железо, т.е. сам зверюга сканер)
Присмотрелся я к своему новому питомцу, а на нём тока одна надпись "SkanMagik 9636P".
Ну, я, стало быть обратился к информационным энциклопедиям Мира (Интернет), чтобы узнать, что за порода такая и какую пищу ентот зверь жрётЬ. А источники мне и говорят, Зверюга твоя толи "Mustek", толи "Plustek". На сайтах Mustek.ru и Plustek.ru признают породу "SkanMagik 9636P".
На обоих источниках предлагается бесплатный корм (драйвера) для моей зверюги ( http://213.209.100.104/driver/1230P-_1236P-_9631P-_9636P-_96/9636p-e.exe http://213.209.100.104/driver/12000P_turbo-9636p_turbo/9636pt-e.exe )
Некоторые знатные сайты обзывали моего питомца "OpticPro 9636P+/Turbo 98001 600x1200 dpi 36bit 512Kb и
OpticPro 9636P 98001 600x1200 dpi 36bit 512Kb" - это на http://www.gjaeger.de/scanner/plustek.html и на http://nerve.nov.net/man/usr/local/man/man5/sane-plustek.5#1 .
На радостях, что есть-чем кормить его, я дров накачал...
Тех, которых ему советовали, тех и накачал!
Устанавливаю дрова и с прекрасным настроением получаю великий облом при клике по "SCANTEST.EXE"
Появляется окно "Dialog" там указан порт сканера "278". При попытке сканировать, появляется сообщение об ошибке (Не найден источник данных TVAIN. Проверьте установку программного обеспечения сканера)
Подскажите, пожалуйста, где взять полный пакет программ и драйверов для "SkanMagik 9636P"!?
Как эти программы настроить и всё-такое прочее...
Ответить: mailto:expert@soobcha.ru?subject=Rass_URK3O6QI2I
[Наверх]

Тема: VB

У меня к Вам, уважаемые специалисты по VB, вот такой вопрос.
Есть следующий код:
Private Declare Function GetGuiResources Lib "user32.dll" (ByVal hProcess As Long, ByVal uiFlags As Long) As Long
Private Declare Function GetCurrentProcess Lib "kernel32" () As Long
Private Declare Function OleCreatePictureIndirect Lib "olepro32.dll" (PicDesc As PicBmp, RefIID As GUID, ByVal fPictureOwnsHandle As Long, IPic As IPicture) As Long
Private Declare Function CreateCompatibleDC Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function CreateCompatibleBitmap Lib "gdi32" (ByVal hdc As Long, ByVal nWidth As Long, ByVal nHeight As Long) As Long
Private Declare Function SelectObject Lib "gdi32" (ByVal hdc As Long, ByVal hObject As Long) As Long
Private Declare Function StretchBlt Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal nSrcWidth As Long, ByVal nSrcHeight As
Long, ByVal dwRop As Long) As Long
Private Declare Function DeleteDC Lib "gdi32" (ByVal hdc As Long) As Long
Private Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As Long
Private Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long
Dim f1 As Long
Dim f2 As Long
Dim hDCMemory As Long, hBmp As Long, hBmpPrev As Long, R As Long
Dim hPal As Long, hPalPrev As Long, RasterCapsScrn As Long, HasPaletteScrn As Long
Private Type GUID
Data1 As Long
Data2 As Integer
Data3 As Integer
Data4(7) As Byte
End Type
Private Type PicBmp
Size As Long
Type As Long
hBmp As Long
hPal As Long
Reserved As Long
End Type
Private Const GR_GDIOBJECTS = 0
Function CreateBitmapPicture(ByVal hBmp As Long, ByVal hPal As Long) As Picture
Dim R As Long, Pic As PicBmp, IPic As IPicture, IID_IDispatch As GUID
With IID_IDispatch
.Data1 = &H20400
.Data4(0) = &HC0
.Data4(7) = &H46
End With
With Pic
.Size = Len(Pic)
.Type = vbPicTypeBitmap
.hBmp = hBmp
.hPal = hPal
End With
R = OleCreatePictureIndirect(Pic, IID_IDispatch, 1, IPic)
Set CreateBitmapPicture = IPic
End Function
Function hDCToPicture(ByVal hDCSrc As Long, ByVal LeftSrc As Long, ByVal TopSrc As Long, ByVal WidthSrc As Long, ByVal HeightSrc As Long) As Picture
hDCMemory = CreateCompatibleDC(hDCSrc)
hBmp = CreateCompatibleBitmap(hDCSrc, WidthSrc, HeightSrc)
hBmpPrev = SelectObject(hDCMemory, hBmp)
R = StretchBlt(hDCMemory, 0, 0, f1, f2, hDCSrc, LeftSrc, TopSrc, WidthSrc, HeightSrc, vbSrcCopy)
hBmp = SelectObject(hDCMemory, hBmpPrev)
Set hDCToPicture = CreateBitmapPicture(hBmp, hPal)
End Function
Private Sub Form_Load()
f1 = (Form1.Width - 100) / Screen.TwipsPerPixelX
f2 = (Form1.Height - 400) / Screen.TwipsPerPixelY
Timer1.Interval = 1
Timer1.Enabled = True
End Sub
Private Sub Form_Resize()
f1 = (Form1.Width - 100) / Screen.TwipsPerPixelX
f2 = (Form1.Height - 400) / Screen.TwipsPerPixelY
End Sub
Private Sub Timer1_Timer()
Set Me.Picture = hDCToPicture(GetDC(0), 0, 0, Screen.Width / Screen.TwipsPerPixelX, Screen.Height / Screen.TwipsPerPixelY)
End Sub
В результате его выполнения "утекают" ресурсы - GDI, вернее создаются GDI Objects,
и после определенного времени начинаются "глюки". Вставлял в процедуру Timer следующий код:
Private Sub Timer1_Timer()
Set Me.Picture = hDCToPicture(GetDC(0), 0, 0, Screen.Width / Screen.TwipsPerPixelX, Screen.Height / Screen.TwipsPerPixelY)
asd1 = DeleteDC(GetDC(0))
asd2 = DeleteDC(hDCMemory)
asd3 = DeleteObject(hBmp)
asd4 = DeleteObject(hBmpPrev)
asd5 = DeleteObject(GetDC(0))
Debug.Print "Использовано ресурсов: " & GetGuiResources(GetCurrentProcess, GR_USEROBJECTS)
End Sub
не помогает. Подскажите, пожалуйста, что можно сделать, чтобы избежать "утечки".
Пока нашел такой выход:
Private Sub Timer1_Timer()
Set Me.Picture = hDCToPicture(GetDC(0), 0, 0, Screen.Width / Screen.TwipsPerPixelX, Screen.Height / Screen.TwipsPerPixelY)
asd1 = DeleteDC(GetDC(0))
asd2 = DeleteDC(hDCMemory)
asd3 = DeleteObject(hBmp)
asd4 = DeleteObject(hBmpPrev)
asd5 = DeleteObject(GetDC(0))
Debug.Print "Использовано ресурсов: " & GetGuiResources(GetCurrentProcess, GR_USEROBJECTS)
If GetGuiResources(GetCurrentProcess, GR_GDIOBJECTS) > 1000 Then
Shell App.Path & "\" & App.EXEName, vbNormalFocus
End
End If
End Sub
Т.к. с закрытием программы удаляются все созданные ей объекты. Но ведь это не правильно!!!
Да и мелькание формы заметно.
Ответить: mailto:expert@soobcha.ru?subject=Rass_URM2YO743H
[Наверх]

Поиск по Базе знаний :
http://www.soobcha.ru/search/

Автоответчики.
Информация о системе Эксперт СообЧа (пустое сообщение):
mailto:reply.infoexpert@soobcha.ru

Информация о порядке регистрации в качестве эксперта (пустое сообщение):
mailto:reply.regexpert@soobcha.ru

Список тем для задания вопросов (пустое сообщение):
mailto:reply.subjexpert@soobcha.ru

Список всех автоответчиков СообЧа (пустое сообщение):
mailto:help@soobcha.org

Информация и заказ диска СообЧа:
http://soobcha.ru/cd/ или:
Для России: mailto:disk@soobcha.org?subject=page
Для Украины: mailto:disk_ua@soobcha.org?subject=page

Администратор системы:
mailto:expert_adm@soobcha.org
Копирование материалов рассылки допускается только по согласованию с администратором системы.
Рассылка создана программой Expert Page Generator.
(С) 2000-2003 СообЧа!


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

В избранное