Сделать так, чтобы при регистрации можно было вводить только буквы AZ-az, А-Я, а-я и цифры

<input type=»text» pattern=»[A-Za-zА-Яа-я]» name=»login»> не работает

В HTML или PHP, как это сделать? Желательно в HTML 😉

if($login=="" || $password=="") << сюда что надо?
{
  die("Заполните все поля!");
}

(читать всё…)

Используя равноплечные рычажные весы, нужно взвесить любой груз с точностью до 1гр., при этом используя набор с минимально возможным количеством гирь. Гири можно класть на любую чашу весов.
Например, для взвешивания груза до 4гр. понадобится набор всего из 2 гирь номиналом 1гр. и 3гр.:
(груз 1гр) = (1гр), уравновесили две чаши весов
(груз 2гр) + (1гр) = (3гр), т.е. двумя гирями номиналом 1гр. и 3гр. взвесили груз весом в 2гр.
(груз 3гр) = (3гр)
(груз 4гр) = (3гр) + (1гр)
Можно записать всё проще: слева вес груза, справа используемые гири, при этом плюс перед числом означает, что гирю с данным номиналом кладем на правую чашу весов, минус — на левую чашу)
1 = + 1
2 = + 3 — 1
3 = + 3
4 = + 3 + 1
Утверждается, что для взвешивания груза весом до 40гр. достаточно иметь набор из 4 гирь,
номиналом 1гр., 3гр., 9гр. и 27гр.
40 = + 27 + 9 + 3 + 1
35 = + 27 + 9 — 1
26 = + 27 — 1
14 = + 27 — 9 — 3 — 1
Следуя той же логике минимального набора имеющихся гирь (как вы уже поняли, это набор гирь, где каждая следующая гиря в три раза тяжелее предыдущей), показать взвешивание груза весом 9200гр.

(читать всё…)

@ echo off
setlocal enabledelayedexpansion

pause
echo Звуковой сигнал №1
call :beep1

pause
echo Звуковой сигнал №2
call :beep2

exit /b

:: Звуковой сигнал через символ с кодом 7 (Alt + 07)
:beep1
setlocal
0<nul set /p =[BEL]
endlocal & exit /b

:: Звуковой сигнал через choice
:beep2
echo 0y | choice /c y /n>nul
exit /b

(читать всё…)

Управляющие последовательности ANSI — символы, встраиваемые в текст, для управления форматом, цветом и другими опциями вывода в текстовом терминале.

В Microsoft Windows поддержка управляющих последовательностей ANSI появилась начиная с Windows 10.

Для управления выводом текста в консоль используются специальные ESC-коды. Выглядят они так:

ESC[<параметры><буква-команда>

ESC[ — признак начала управляющей последовательности. ESC — непечатный символ с кодом 27 (U+001B). Набирается посредством Alt+27 или Alt+027, на экране выглядит как вопросик в квадрате или иначе, в зависимости от редактора.
<параметры> — цифры (иногда с ; ), указывают режим или количество.
<буква-команда> — финализирующий символ, указывающий какое именно действие.

Так как набирать непечатный символ ESC не очень удобно, да и скопировать текст с непечатными символами может быть проблематично (допустим, невозможно поделиться кодом на форуме), то можно программно получить префикс для CSI-кодов. Вот код для получения CSI-префикса:

:: Получаем префикс CSI = ESC + [
for /f "delims=" %%a in ('echo prompt $E[^| cmd /q /d /k') do set "CSI=%%a"

(читать всё…)

Хотел сделать такой вот код, но он выдал ошибку в процессе исполнения

    E.SetFocus;
    If F.ShowModal ...

Где E — TEdit на форме F

Вопрос: как сделать фокус на E при том что я запускаю форму через ShowModal?

(читать всё…)

Есть 100 документов вордовских, на каждом надо поставить нижний колонтитул с номером. На первом документе в колонтитуле будет 1, на втором 2 и так далее до последнего документа.

(читать всё…)

Как правильно сделать запрос такого типа:

UPDATE in_main SET SelectionDescription='$SelectionDescription', id=('SELECT MAX('id') FROM `in_main`'+1) WHERE DocumentNumber='$DocumentNumber'

А именно меня интересует строчка

 id=('SELECT MAX('id') FROM `in_main`'+1)

.
То есть мне нужно изменить id записи на последний id+1.

P.S. поле id автоинкремент, я бы использовал mysqli_insert_id, но оно работает, только если insert был использован в текущем подключении.

(читать всё…)

Delphi7.

На форме есть Panel на ней лежат компоненты StatusBar и Button.
При выполнении Panel.Enabled:=false
компоненты уже не реагируют на нажатия но визуально они не меняются на серые
Нужно что бы при отключении панели было визуально видно что все компоненты лежащие на ней стали не активны.

Как такое реализовать малой кровью?

(читать всё…)

<style>

</style>
 <table cellpadding="5px" border="1">
 <tr> <<--
 <td> 1
 </tr>
 <tr>
<td style="visibility: hidden"><img src="me.png"></td>
</tr>
 </table>

(читать всё…)

Есть ли в Qt виджет, выбора цвета? Не QColorDialog, а именно виджет, что бы его поместить в основную форму.

(читать всё…)