Опять торможу. Какая функция в Turbo Pascal отвечает...

← →
ProgRAMmer Dimonych © (2006-11-17 20:40) [0]

за заполнение строковой переменной одинаковыми символами в заданном количестве.

P.S. Для тех, кому проще в сравнении... В Бейсике такой функцией является STRING$().

← →
Anatoly Podgoretsky © (2006-11-17 20:49) [1]

> ProgRAMmer Dimonych (17.11.2006 20:40:00) [0]

А не StringOfChar случайно ли?
Перевод посмотри в словаре.

← →
ProgRAMmer Dimonych © (2006-11-17 20:53) [2]

> Anatoly Podgoretsky © (17.11.06 20:49) [1]
И без словаря обойдусь, только в Turbo Pascal такой функции нет.

← →
Anatoly Podgoretsky © (2006-11-17 20:55) [3]

> ProgRAMmer Dimonych (17.11.2006 20:53:02) [2]

О не обратил внимания, тогда не ищи.

← →
ProgRAMmer Dimonych © (2006-11-17 20:57) [4]

> Anatoly Podgoretsky © (17.11.06 20:55) [3]
В смысле нет такой?

← →
Anatoly Podgoretsky © (2006-11-17 21:15) [5]

> ProgRAMmer Dimonych (17.11.2006 20:57:04) [4]

В смысле нет.
Это Борланд виноват, они посторно слово Турбо стали использовать.

← →
ProgRAMmer Dimonych © (2006-11-17 21:18) [6]

Ладно, нарисую циклом.

Спасибо за подсказку. Зарешался я уже, пора на паузу стать.

Кстати, хотел спросить. Уже не по теме... У Вас сайт с доменным именем второго уровня в зоне .com Кто Ваш хостер, во сколько Вам это обходится? Если не секрет, конечно.

← →
Anatoly Podgoretsky © (2006-11-17 21:28) [7]

> ProgRAMmer Dimonych (17.11.2006 21:18:06) [6]

Я хостер, в какой валюте, но могу ответить - в любой равно 0

← →
ProgRAMmer Dimonych © (2006-11-17 21:44) [8]

Ясно, а услуга хостинга сколько стоит?

← →
Anatoly Podgoretsky © (2006-11-17 21:47) [9]

> ProgRAMmer Dimonych (17.11.2006 21:44:08) [8]

Услуги хостинга предоставляю только одному человеку - себе.

← →
ProgRAMmer Dimonych © (2006-11-17 21:50) [10]

Жаль, жаль. А каким образом Вам удалось так устроиться, если не секрет?

← →
Anatoly Podgoretsky © (2006-11-17 21:52) [11]

> ProgRAMmer Dimonych (17.11.2006 21:50:10) [10]

Что значит устроиться, куда?

← →
ProgRAMmer Dimonych © (2006-11-17 21:54) [12]

Ну, в смысле "сам себе хостер"...

← →
Anatoly Podgoretsky © (2006-11-17 21:56) [13]

> ProgRAMmer Dimonych (17.11.2006 21:54:12) [12]

Очень просто, вот рядом на столе стоит компьютер, на котором хостится мой сайт. Компьютер куплен на личные средства, стол стоит в моей спальне.

← →
ProgRAMmer Dimonych © (2006-11-17 22:06) [14]

А какие условия должны выполняться, чтобы так можно было сделать у себя (кроме регистрации доменного имени)?

← →
Anatoly Podgoretsky © (2006-11-17 22:07) [15]

> ProgRAMmer Dimonych (17.11.2006 22:06:14) [14]

Достаточно иметь канал в Интернет, у меня DSL и фиксированый адрес.

← →
ProgRAMmer Dimonych © (2006-11-17 22:09) [16]

Программы какие-нибудь?

← →
Anatoly Podgoretsky © (2006-11-17 22:11) [17]

> ProgRAMmer Dimonych (17.11.2006 22:09:16) [16]

Необходимые сервисы, как правило FTP/HTTP/POP/SMTP
Платформа роли не играет, например в XP PRO уже есть все необходимое из этого списка, можно поставить и что ни будь другое, например бесплатное.

← →
ProgRAMmer Dimonych © (2006-11-17 22:14) [18]

А если ADSL-модем в режиме рутера?

← →
Anatoly Podgoretsky © (2006-11-17 22:17) [19]

> ProgRAMmer Dimonych (17.11.2006 22:14:18) [18]

Тогда согласно настройкам маршрутизатора, в разных по разному, обычно называется или виртуальный сервер, или port forwarding
Тут каждый Сам Нам Злобный Буратино.
Но суть простая ИП:Порт на публичном адресе перебрасывается на другой компьютер.
У меня маршрутизатор в режиме моста.

← →
Anatoly Podgoretsky © (2006-11-17 22:19) [20]

> ProgRAMmer Dimonych (17.11.2006 22:14:18) [18]

Ты не хочешь перейти в другую конферецию (в Прочее) и там создать новую тему.
А то неудобно говорить в теме "Опять торможу. Какая функция в Turbo Pascal отвечает..." и на вопрос не связаный с программированием?

← →
ProgRAMmer Dimonych © (2006-11-17 22:26) [21]

Ну, собственно говоря, я об этом уже подумывал, но там сейчас темы поважнее: в разумах форумчан идёт подготовка к новому этапу в развитии сайта. Могут и покусать.

Тем более, я так понимаю, никаких конкретных советов по настройке я не смогу у Вас получить по меньшей мере до тех пор, пока не закреплю за собой определённое доменное имя. Поэтому я думаю наш разговор скоро всё равно закончится. Лично у меня больше вопросов пока нет (о том, какой хостинг Вы считаете лучшим не спрашиваю :)). Да и модераторы вроде как молчат (сейчас обязательно появятся :)).

← →
Anatoly Podgoretsky © (2006-11-17 22:29) [22]

> ProgRAMmer Dimonych (17.11.2006 22:26:21) [21]

Советы по настройке зависят от гигансткого множества факторов, крупные блоки ОС, сервера. Например в ХР просто зайти в установка программ и установить нужные сервисы, потом настроить.
Знать надо много, понимать как это работает, но это не очень сложно.

← →
ProgRAMmer Dimonych © (2006-11-17 22:31) [23]

Ладно. Я надеюсь, когда вопрос действительно станет серьёзным и требующим решения, я смогу получить от Вас подсказку?

← →
Anatoly Podgoretsky © (2006-11-17 22:33) [24]

> ProgRAMmer Dimonych (17.11.2006 22:31:23) [23]

Я же не зря указал - зависит от ОС и от установленых программ. Если действительно хочешь получить ответ, то задавай в соответствующем форуме и хорошо формулируй.
Количесто программ-серверо просто невероятное, количество ОС поменее.

← →
ProgRAMmer Dimonych © (2006-11-17 22:35) [25]

То есть надежда есть?

Тогда ещё раз огромное спасибо за ответ на мои глупые вопросы.

← →
Anatoly Podgoretsky © (2006-11-17 22:40) [26]

> ProgRAMmer Dimonych (17.11.2006 22:35:25) [25]

Если надеешься на меня, то по ОС и программам немного, ОС у меня старая, сервисы IIS/Apache.
Настройка и установка этого очень специфична, а так как это серверы, то информация об этом очень быстро забывается.
Тебе важно выбрать платформу (Windows/Unix/Linus), потом инструменты под нее, вот на эти вопросы тебе ответят, но это вопросы весьма религиозные.
После выбора можно уже конкретные вопросы по инсталяции и настройки.

← →
MsGuns © (2006-11-18 00:31) [27]

>ProgRAMmer Dimonych © (17.11.06 20:40)
>за заполнение строковой переменной одинаковыми символами в заданном количестве.

Есть в WinAPI (что-то вроде FillChar)
А что, проблема написать одну строчку кода ?

← →
Германн © (2006-11-18 00:31) [28]

> Опять торможу. Какая функция в Turbo Pascal отвечает...
>
> ProgRAMmer Dimonych © (17.11.06 20:40)
>
> за заполнение строковой переменной одинаковыми символами
> в заданном количестве.

Двумя функциями можно. И без циклов.

← →
RASkov (2006-11-18 00:39) [29]

> [6] ProgRAMmer Dimonych © (17.11.06 20:40)

Я с Turbo Pasca"ем не знаком но может будет совместимо.
Это из StrUtils

function DupeString(const AText: string; ACount: Integer): string; var P: PChar; C: Integer; begin C := Length(AText); SetLength(Result, C * ACount); P := Pointer(Result); if P = nil then Exit; while ACount > 0 do begin Move(Pointer(AText)^, P^, C); Inc(P, C); Dec(ACount); end; end;

← →
RASkov (2006-11-18 00:40) [30]

> Я с Turbo Pasca"ем
Pascal"ем

>RASkov (18.11.06 00:39) [29]

Спрячь это и никогда никому не показывай

← →
RASkov (2006-11-18 00:44) [32]

← →
RASkov (2006-11-18 00:55) [33]

> [31] MsGuns © (18.11.06 00:43)

Т.е. сказать, что сказано в [31] это все могут, а обосновать....
Мне вот хотелось бы узнать чем плохо [29]. Хоть и не я это придумал...

Потому что СТРАШНО

← →
RASkov (2006-11-18 01:00) [35]

> [34] MsGuns © (18.11.06 00:56)

Это и всё? Я уж и всамом деле испугался.
Сергей, я просто хотел услышать мнение, обоснованное почему нужно делать как в [31].
Приведи пример с FillChar"ом.

← →
fog (2006-11-18 01:02) [36]

FillChar никого уже не устраивает?

>RASkov (18.11.06 01:00) [35]
>Сергей, я просто хотел услышать мнение, обоснованное почему нужно делать как в [31].

Потому что НЕЛЬЗЯ делать сложно то, что НУЖНО делать просто.

В частности, зачет так безобразно работать со строками в паскале, языке, имеющем прекрасный встроенный строковый аппарат ?

Ну а вот это:

Move(Pointer(AText)^, P^, C);

вообще какой-то ужастик ;)))

FillChar procedure
Fills contiguous bytes with a specified value.

Unit

System

Category

character manipulation routines

Delphi syntax:

procedure FillChar(var X; Count: Integer; Value: Byte);

Description

In Delphi, FillChar fills Count contiguous bytes (referenced by X) with the value specified by Value (Value can be type Byte or Char).

Warning: This function does not perform any range checking.

← →
RASkov (2006-11-18 01:34) [39]

Так как примера небыло... Вот что у меня получилось, если что подправьте:)

function MS(const Ch: Char; const Count: Integer): String; var S: array [0..255] of Char; begin FillChar(S, Count, Ord(Ch)); Result:=S; SetLength(Result, Count); end; procedure TForm1.btn1Click(Sender: TObject); begin ShowMessage(MS("S", 10)); ShowMessage(DupeString("QWERTY", 10)); //[29] end;

Во втором случае можно не только 1 символом заполнять:)
Собственно мне это не надо, но раз уж нарвался...

← →
RASkov (2006-11-18 01:38) [40]

> Move(Pointer(AText)^, P^, C);
>
> вообще какой-то ужастик ;)))

:))

Те, кто это придумал, я их считаю не далекими от своего дела. Поэтому и привел кусок ихого кода.
Это из RxLib.

Опять торможу. Какая функция в Turbo Pascal отвечает... Найти похожие ветки