Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.06;
Скачать: CL | DM;

Вниз

Разбивка сообщения по 70 символов..   Найти похожие ветки 

 
jcrush   (2005-01-21 04:13) [0]

Привет, пишу отправку сообщений SMS, можно пример отсылки сообщения по частям в разрыве 70 символов? нужно посчитать скока всего порезать и отправить кусками..

Спасибо...


 
KilkennyCat ©   (2005-01-21 04:28) [1]


> в разрыве 70 символов


это как?

А вообще непонятно, как можно писать программы такого уровня, и не порезать самому кусками...


 
Viktop   (2005-01-21 04:45) [2]

Попробуй разобраться с этим кодом. Я раньше писал оболочку для net send.
if length(s) > 70 then
   begin
     k := length(s) div 100 + 1;
     z := 1;
     for i := 1 to k do
     begin
       s := "net send " + string(ComboBox.Text) + " " + copy(Edit1.text, z,
         70);
       z := z + 70;
       WinExec(PAnsiChar(s), SW_SHOW);
     end;
     WinExec(PAnsiChar(s), SW_SHOW);
   end


 
KilkennyCat ©   (2005-01-21 04:51) [3]

"Если при разбивке кусками программисты стали использовать WinExec(PAnsiChar(s), SW_SHOW), то мне в космосе делать нечего..."
© механик Зеленый.


 
default ©   (2005-01-21 05:03) [4]

KilkennyCat ©   (21.01.05 04:51) [3]
он просто выдрал этот кусок из своего раннего кода


 
KilkennyCat ©   (2005-01-21 05:10) [5]


> default ©   (21.01.05 05:03) [4]


Это-то понятно... но ежели такую простую задачу так сложно объяснять, то вообще ерунда выйдет...


 
default ©   (2005-01-21 05:35) [6]

KilkennyCat ©   (21.01.05 05:10) [5]
ну как грится "чем смогли тем помогли"
"дарёному коню в зубы..."
хотя это опасная поговорка!
тогда люди на форуме перестанут вопросы задавать - кстати идея...
достанет чужой глючный код придётся свой писать - так и привычка возникнет!



Страницы: 1 вся ветка

Текущий архив: 2005.02.06;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.025 c
1-1106410715
sardox
2005-01-22 19:18
2005.02.06
Тулбар...


3-1104821945
Нуждающийся в помощи
2005-01-04 09:59
2005.02.06
Использование IB в глобальных сетях


1-1106634562
Mamed
2005-01-25 09:29
2005.02.06
RTF Fayli


1-1106488622
SDen
2005-01-23 16:57
2005.02.06
Как полностью выгрузить программу


1-1106289423
NewDelpher
2005-01-21 09:37
2005.02.06
как найти причину AV в vcl50.bpl?