Разбивка сообщения по 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]
он просто выдрал этот кусок из своего раннего кода

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

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

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

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