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

KLSoft company - программирование в Delphi и PHP

Рассылка закрыта

При закрытии подписчики были переданы в рассылку "Веб-разработка: пособие начинающим" на которую и рекомендуем вам подписаться.

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

  Июль 2004   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
21.07.2004
16:56:03
18:55:19
22
23
24
25
26
27
28
29
30
31
Автор
ADMIN

Статистика

989 подписчиков
0 за неделю
←   Все выпуски   →

X-Program ПО, новости сайта и программирование в Delphi7


Информационный Канал Subscribe.Ru
Выпуск 1
Выпуск 1
Сегодня в выпуске:
Программа MM (The Maximal opportunities in the Minimal size)
10 советов начинающему интернет-бизнесмену
Перекодировка текста DOS <-> Widowns <-> Koi8 в Delphi
Юмор

MM (The Maximal opportunities in the Minimal size)
MM - проигрыватель аудио файлов.
Наверное самый маленький по размерам главной формы проигрыватель. Имеются все стандартные функции аудио проигрывателя.
На данный момент данный проигрыватель отличается от других своим размером(как файла так и главной формы) и простотой обращения. Программа создана недавно. Тестирование не выявило ошибок, но если Вы обнаружите ошибку в программе, то ПОЖАЛУЙСТА напишите что за ошибка на адресс x-program@narod.ru
Скачать программу Вы можете по адрессу http://www.x-program.narod.ru/progam/mm.exe или посетив www.x-program.narod.ru
***
10 советов начинающему интернет-бизнесмену
1. Заранее определитесь с ресурсами, необходимыми для проекта - люди, время, деньги, оборудование. Определите для себя критерии, по которым будете определять успешность реализации проекта.
2. Определите, кто будет вашими клиентами - ответьте на вопрос "ЧКК": что, кому и как продавать. С учетом этого сформулируйте ваше предложение. Разработайте детальный маркетинговый план и рекламный план, уделив внимание изучению существующих конкурентов (в том числе и не интернетовских). Помните, что клиенты предпочитают иметь широкий выбор, конкурентные цены, полную и объективную информацию о товаре, не иметь сложностей с оформлением заказа, ощущать безопасность совершения покупки, оперативно получать отклик на свои вопросы, и главное - своевременно получать заказ.
3. Разработайте сайт - структуру, дизайн, программную часть.
4. Разработайте и реализуйте дружественный для посетителя интерфейс. Если речь идет о магазине, то это включает в себя четкие и логичные правила пользования магазином, описание процесса заказа и сроков получения товара, подробную информацию о товаре, простоту совершения покупки.
5. Разработайте бэк-офис, на который возложена обработка заказов и платежей. Если есть возможность - интегрируйте каталог товаров сайта с базой данных склада. Создайте систему автоматизация приема и обработки заказов, обработки платежей, реакции на запросы (вопросы) клиентов.
6. Разместите сайт на надежном сервере и быстром канале связи, который в состоянии обеспечить большой трафик и корректное функционирование программной части и надлежащий уровень безопасности.
7. Подготовьте необходимые ресурсы для своевременного пополнения складаи доставки заказа (и/или договоритесь с поставщиками и службой доставки). Помните, что от профессионализма специалистов, работающих с клиентом (от менеджера до курьера) зависит очень многое.
8. Разработайте процедуры обработки запросов о состоянии заказа и обеспечения технической поддержки и оперативных ответов на вопросы.
9. Развивайте проект. Ведите работу со старыми клиентами, анализируйте спрос, пожелания клиентов и статистику продаж, реализуйте активную рекламную и маркетинговую политику.
10. Удерживайте клиентов. Обновляйте информацию, публикуйте статьи и новости. Создайте список рассылок, механизм персонализации сайта, сервиса и контента, раскручивайте свой бренд.
Разумеется, этим список не исчерпывается, но если Вы сумеете реализовать указанное выше - это будет большим успехом! И его результаты Вы увидете довольно скоро.
***
Перекодировка текста DOS <-> Widowns <-> Koi8 в Delphi
procedure WinToDos;
var Src, Str:PChar;
begin
Src := Memo1.Lines.GetText; //Берем текст из TMemo как тип PChar
CharToOem(Src, Str); //API функция для перевода текста
Memo2.Lines.Text := StrPas(Str);//Записываем назад
end;

procedure DosToWin;
var Src, Str:PChar;
begin
Src := Memo1.Lines.GetText; //Берем текст из TMemo как тип PChar
OemToChar(Src, Str); //API функция для перевода текста
Memo2.Lines.Text := StrPas(Str);//Записываем назад
end;
var koi8toalt : array [0..127] of char = (
CHR($c4), Chr($b3), Chr($da), Chr($bf), Chr($c0), Chr($d9), Chr($c3), Chr($b4), Chr($c2), Chr($c1), Chr($c5), Chr($df), Chr($dc), Chr($db), Chr($dd), Chr($de), Chr($b0), Chr($b1), Chr($b2), Chr($f4), Chr($fe), Chr($f9), Chr($fb), Chr($f7), Chr($f3), Chr($f2), Chr($ff), Chr( $f5), Chr($f8), Chr($fd), Chr($fa), Chr($f6), Chr($cd), Chr($ba), Chr($d5), Chr($f1), Chr($d6), Chr($c9), Chr($b8), Chr($b7), Chr($bb), Chr($d4), Chr($d3), Chr($c8), Chr($be), Chr($bd), Chr($bc), Chr($c6), Chr($c7), Chr($cc), Chr($b5), Chr($f0), Chr($b6), Chr($b9), Chr($d1), Chr($d2), Chr($cb), Chr($cf), Chr($d0), Chr($ca), Chr($d8), Chr($d7), Chr($ce), Chr($fc), Chr($ee), Chr($a0), Chr($a1), Chr($e6), Chr($a4), Chr($a5), Chr($e4), Chr($a3), Chr($e5), Chr($a8), Chr($a9), Chr($aa), Chr($ab), Chr($ac), Chr($ad), Chr($ae), Chr($af), Chr($ef), Chr($e0), Chr($e1), Chr($e2), Chr($e3), Chr($a6), Chr($a2), Chr($ec), Chr($eb), Chr($a7), Chr($e8), Chr($ed), Chr($e9), Chr($e7), Chr($ea), Chr($9e), Chr($80), Chr($81), Chr($96), Chr($84), Chr($85), Chr($94), Chr($83), Chr($95), Chr($88), Chr($89), Chr($8a), Chr($8b), Chr($8c), Chr($8d), Chr($8e), Chr($8f), Chr($9f), Chr($90), Chr($91), Chr($92), C hr($93), Chr($86), Chr($82), Chr($9c), Chr($9b), Chr($87! ), Chr($ 98), Chr($9d), Chr($99), Chr($97), Chr($9a)
);

function Koi8toWin(const Data:PChar; DataLen :Integer):PChar;
var PCh: PChar;
i: Integer;
begin
PCh:=Data;
for i:=1 to DataLen do
begin
if Ord(Pch^)>127 then Pch^:=koi8toalt[Ord(Pch^)-128];
Inc(PCh);
end;
PCh:=Data;
OemToCharBuff(PCh,PCh,DWORD(DataLen));
Result:=Data;
end;
***
Юмор
Правила студенческого этикета

1. Проснулся сам — разбуди товарищей. Свежий поток нецензурной брани поможет тебе прогнать сон и даст хороший заряд бодрости.
2. Разбудив товарищей, нужно первым: захватить душ и туалет, умять на завтрак общественный запас бутербродов, надеть самые хорошие ботинки. В результате получишь дополнительный заряд бодрости.
3. Выходя из общежития, не буди вахтера — пожалей старика. Хватит с него того, что ты устроил в четыре часа ночи, возвращаясь с дискотеки.
4. В университетских коридорах здоровайся со всеми, кто старше тридцати. А, вдруг, это — твой преподаватель? — Не запоминать же всех, в самом деле!
5. Вваливаясь на лекцию с солидным опозданием, не отвлекай преподавателя стуком в дверь и глупым вопросом: «Можно войти?». Если нельзя, тебя вышвырнут и так, если можно — сделают вид, что не заметили.
6. Если, вдруг, пустили на лекцию, не разговаривай, не балуйся и не шуми. Ляг на парту и спи спокойно. Разговаривать, баловаться и шуметь будешь на следующей лекции, когда выспишься.
7. Очень осторожно относись к конспектированию. Обычно конспекты ведут старательные девочки. Перед тем, как начинать этот сомнительный процесс, задумайся о жизни, о своей половой ориентации.
8. Задавай на занятиях как можно больше вопросов по поводу и без. Есть шанс, что преподаватель тебя запомнит, и, когда ты явишься на экзамен, он будет уверен, что ты с этой специальности, с этого потока, и с этого факультета, не взирая на твои ответы.
9. На лабораторной работе: разбей пробирки, спали трансформатор и отформатируй винчестер компьютера. Этим ты не только позабавишь себя, но и осчастливишь студентов, который придут на твое рабочее место на следующей паре.
10. После занятий совесть тебя толкает в библиотеку, а душа тянет в бар. Поступай по велению души: то, что подают в баре, усваивается легче чем, то, что подают в библиотеке.
11. После бара можно пойти по знакомым: а вдруг кто-нибудь накормит? Если покормили, долго и усердно благодари за угощение. Это повышает шансы на повторный заход.
12. Совесть предлагает позаниматься. Ответь ей, что еще не конец семестра и иди на футбол.
13. Опять пройдись по знакомым, в надежде поужинать на халяву. Чем больше знакомых — тем эффективней борьба с голодом. Таким образом, самые пронырливые шаровики обзаводятся самыми обширными связями. Именно из них в будущем вырастают депутаты и президенты.
14. После ужина немного вздремни и — на дискотеку.
15. Возвращаясь пьяным под утро с дискотеки, не груби вахтеру. Просто побей стекла, обрыгай холл и подними на уши всю общагу. В лучшем случае, это поможет вылететь тебе из университета, невзирая на все связи твоих родителей. В худшем (если связи твоих родителей перевесили здравый смысл администрации) — завоюешь авторитет среди товарищей.
16. Ложась спать, разбуди товарищей. Не лишай их возможности порадоваться тому, что ты, наконец, явился живой и здоровый.
17. Следующий день начни с пункта 1.

*****************

Дорогая, я дома!
История из жизни.

Дорогая, я дома!
(тишина)

- Я пришел!
(еще более тихая тишина)

- Что за б..дство такое? Любимый муж приходит с работы, уставший, голодный, а его встречают только рваные тапки и тощий кот!
(кот демонстративно отворачивается и мочится на тапок)

- Семья, твою мать! Ты где?
(?)

- Ладно, хрен с вами?
- Я, между прочим, зарплату получил!
(ноль эмоций)

- И в должности меня повысили!!
(два ноля эмоций)

- У меня День рождения сегодня, в конце-то концов!!!
(Чуть громче)

- Раз никого дома нет, буду курить прямо здесь, сегодня мне можно, задыхайтесь!
(Еще громче)

- И друзей приглашу водку пить! Много водки!
- А придут они не со своими дебильными женами, а с подругами? И мне приведут!
(тишина)

- Кстати, уважаемая супруга, хотел тебе сказать: мне давненько уже приглянулась твоя подруга Ольга из соседнего подъезда. И, судя по всему, я ей. Сука она, конечно, та еще, но мы же с ней трахаться будем, а не жить, так что на хрен мне ее характер?
(как в могиле)

- А друзья напьются и опять будут пошлости о тебе говорить. Я их снова назову мудаками, кем они на самом деле и являются, даже когда трезвые, и набью им морды об кухонный стол.
(кот, задрав хвост, демонстрирует презрение)

- Кстати, тот пидороцефал Миша, который был у нас на свадьбе, своей жене тоже изменяет. Изменяет даже не со Светланой, это раньше было, а с Альбертом.
(кот нагадил во второй тапок)

- И вообще, наши с тобой знакомые, включая твоих родственников, все, без исключения, морально разложившиеся типы. А Сергей Федорович уже и физически начал.
(животное направляется в комнату, медленно открывая в нее дверь)

Праздничный стол, воздушные шары, оливье, вино, водка, друзья, Ольга, Светлана, Альберт, пидороцефал Миша, Сергей Федорович, любимая супруга. Изумленные лица, открытые рты, плакат "С 30-летием!", медленно летящая в лицо юбиляру тарелка с его же праздничным тортом. Где-то вдалеке едва слышный шепот жены: "С Днем рождения, милый! Мы хотели сюрприз тебе сделать, обрадовать..."
http://subscribe.ru/
E-mail: ask@subscribe.ru 		Отписаться
В избранное