MaskEdit

← →
Fath (2004-08-10 14:44) [0]

В maskedit1 цифры под маской XX-XXXX мне их надо скопировать в Maskedit2 но там маска XX.XXXX как это можно сделать? спасибо.

← →
Андрей Сенченко © (2004-08-10 14:57) [1]

стереть "-", записать "."

← →
Fath (2004-08-10 16:24) [2]

что то не получаеться: из маскедит1 надо перенести числа в маскедит4 в первом маска XX-XXXX а в четвертом XX.XXXX, такая комбинация тока - пишет в четвертый =(

var
st: shortstring;
.....
st:=maskedit1.text ;
st[pos(St,"-")] := "." ;
maskedit4.text:=st;

← →
Андрей Сенченко © (2004-08-10 17:34) [3]

Ну конкретно для этой маски.

MaskEdit2.Text := concat(copy(maskedit1.Text,1,2),".",copy(maskedit1.Text,4,4));

Проверил. Универсальности конечно никакой,, но работает

← →
Fath (2004-08-10 17:45) [4]

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

if (maskedit2.text="___-__-__") or (maskedit3.text="___-___-__-__") then
BEGIN
MessageDlg("Не заполнено одно из обязательных полей:"+ #10#13 +"Дом.телефон"+ #10#13+"Моб.телефон", mtError, [mbOk], 0);
end

← →
Андрей Сенченко © (2004-08-10 17:47) [5]

Прикалываешься ?

Если нет - марш бегом методички по паскалю читать. Рановато Тебе в этом случае базы писать.

← →
Fath (2004-08-10 17:55) [6]

=))) до баз мне и правда далеко, эту прогу я для себя пишу. Еще с этими масками не работал не разу.

← →
Андрей Сенченко © (2004-08-10 18:03) [7]

if (maskedit2.text="___-__-__")

вернет true только в том случае, если пользователь введет комбинацию.
Три подчерка тире два подчерка тире два подчерка

← →
Андрей Сенченко © (2004-08-10 18:07) [8]

Берешь короче букварь и айда читать раздел "Строки" - там много интересного.

← →
Fath (2004-08-10 18:11) [9]

=))) я уже разобрался в чем причина, просто я чтобы скопировать что у меня в maskedit.text я нажимал два раза на текст, и он открывал маску, надо было просто скопировать из Text значение

← →
Fath (2004-08-10 18:17) [10]

if (maskedit2.text=" - - ") and (maskedit3.text=" - - - ") then
//вот так надо =)

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

А причем здесь слабая документированность МаскЭдита ?
Ваш вопрос касался исключительно операций работы со строками.

Вот это if (maskedit2.text=" - - ") кстати тоже

MaskEdit Найти похожие ветки