Delphi:Вопрос-Ответ

TimKruz

Дата: Понедельник, 19.12.2011, 23:03 | Сообщение # 161

старожил

Сообщений: 1588

Сейчас нет на сайте

Quote (vicu2010)

та включил я его, там какие-то диски Y

Там можно ввести буква_диска: (C: D: E: и т.д.) и попасть на нужный диск...

vicu2010

Дата: Понедельник, 19.12.2011, 23:14 | Сообщение # 162

TheVic

Сообщений: 1440

Сейчас нет на сайте

Quote (TimKruz)

Там можно ввести буква_диска: (C: D: E: и т.д.) и попасть на нужный диск...

ого, пасиб)

"Ты проживёшь зря если не оставишь в этом мире след"
Always 6teen

arys

Дата: Пятница, 23.12.2011, 21:00 | Сообщение # 163

почетный гость

Сообщений: 105

Сейчас нет на сайте

Всем привет! Помагите плз!! Сейчас начнется олимпияда! Очень надо! Продлится 5 часов, 3 задачи. Я живу в Казахстане, и не думаю что я отобью у ково нибудь место. И "- Каждый должень делать сам", да да... , каждый должен нахадить пути решения задания))))

Добавлено (23.12.2011, 21:00)
---------------------------------------------
Всем ещё раз привет.Нуббский вопрос: как сделать так что бы сделать типа некст рума(гамака)???

500 символов не хватит, а писать начало... нету смысла без конца..

LunarPixel

Дата: Пятница, 23.12.2011, 21:28 | Сообщение # 164

старожил

Сообщений: 2707

Сейчас нет на сайте

Создаешь несколько форм, на первой, основной форме ставишь кнопку и по нажатию на неё пишешь, например:
form1.visible:=false;
form2.showmodal;

И не забудь в uses объединить все unit-ы форм, хотя это должно произойти автоматически, появится соответствующее сообщение.

Набор в команду по развитию сайта GiGatun.ru

Уроки по GM от LunarPixel

Мой сайт "Лунный Пиксель"

arys

Дата: Пятница, 23.12.2011, 22:08 | Сообщение # 165

почетный гость

Сообщений: 105

Сейчас нет на сайте

А можно по другому? Без форм.

500 символов не хватит, а писать начало... нету смысла без конца..

masb8ly-GC

Дата: Пятница, 23.12.2011, 23:39 | Сообщение # 166

участник

Сообщений: 156

Сейчас нет на сайте

Делай видимыми и невидимыми обьекты, а не формы! Все можно на одной форме)

TimKruz

Дата: Суббота, 24.12.2011, 19:19 | Сообщение # 167

старожил

Сообщений: 1588

Сейчас нет на сайте

Quote (arys)

Всем ещё раз привет.Нуббский вопрос: как сделать так что бы сделать типа некст рума(гамака)???

Ну всё зависит от того, что ты делаешь. Если игру - то просто, например, загружаешь файл с описанием второй комнаты, и рисуешь её. Если программа - то просто скрываешь не нужные компоненты (visible:=false) и показываешь нужные (visible:=true), а размещаешь их заранее.

P.S. "то просто", "то просто"... У меня всё просто... biggrin

***

Quote (LunarPixel)

Создаешь несколько форм, на первой, основной форме ставишь кнопку и по нажатию на неё пишешь, например:
form1.visible:=false;
form2.showmodal;
И не забудь в uses объединить все unit-ы форм, хотя это должно произойти автоматически, появится соответствующее сообщение.

Ну, если реально не приходится делать несколько форм, то делать так плохо. Лучше всего, когда всё на одной форме - красивей, компактней, меньше ресурсов потребляет...

Сообщение отредактировал TimKruz - Суббота, 24.12.2011, 19:21

masb8ly-GC

Дата: Суббота, 24.12.2011, 20:15 | Сообщение # 168

участник

Сообщений: 156

Сейчас нет на сайте

Здравствуйте! Возможно ли как-то записать в memo текст подряд? Потому, что если я использую mmo1.lines.append(n), то каждый символ добавляется на новую строку, а мне нужно чтобы все символы шли подряд!

karuy

Дата: Суббота, 24.12.2011, 20:35 | Сообщение # 169

постоянный участник

Сообщений: 389

Сейчас на сайте

Code

Memo1.Lines.Text:=Memo1.Lines.Text+Str;

++++++++++[>++++++++++>++++++++++>+++++++++++>++++++++++++>++++++++++++<<<<<-]>+++++++.>---.>++++.>---.>+.
Для замечаний по поводу грамотности есть репутация.

masb8ly-GC

Дата: Суббота, 24.12.2011, 21:28 | Сообщение # 170

участник

Сообщений: 156

Сейчас нет на сайте

Премного благодарен!)
Спасибо!)

Добавлено (24.12.2011, 21:28)
---------------------------------------------
И еще один вопросик! Почему ord работает только с конкретным символом, но не работает с переменной содержащей этот символ?

TimKruz

Дата: Суббота, 24.12.2011, 21:54 | Сообщение # 171

старожил

Сообщений: 1588

Сейчас нет на сайте

Quote (masb8ly-GC)

Почему ord работает только с конкретным символом, но не работает с переменной содержащей этот символ?

Как не работает? Работает, с char, string[номер]:

Code

var c:char; s:string; n1,n2:byte;
c:='ы';
s:='блаблабла';
n1:=ord(c); //251
n2:=ord(s[1]); //225

Сообщение отредактировал TimKruz - Суббота, 24.12.2011, 21:58

masb8ly-GC

Дата: Суббота, 24.12.2011, 22:00 | Сообщение # 172

участник

Сообщений: 156

Сейчас нет на сайте

Точно char! А у меня она стринг была! Спасибо!)

TimKruz

Дата: Суббота, 24.12.2011, 22:02 | Сообщение # 173

старожил

Сообщений: 1588

Сейчас нет на сайте

Quote (masb8ly-GC)

Точно char! А у меня она стринг была! Спасибо!)

Как можно забыть название типа переменной? biggrin

Ну а к строке тоже так обращаться можно, только нужно указывать, к какому символу конкретно (от 1 до длины строки), в квадратных скобках.

masb8ly-GC

Дата: Суббота, 24.12.2011, 22:17 | Сообщение # 174

участник

Сообщений: 156

Сейчас нет на сайте

Понятно) Спасибо, а есть ли какая-то функция противоположная ord?

TimKruz

Дата: Суббота, 24.12.2011, 22:24 | Сообщение # 175

старожил

Сообщений: 1588

Сейчас нет на сайте

Quote (masb8ly-GC)

Понятно) Спасибо, а есть ли какая-то функция противоположная ord?

Т.е. возвращающая символ по номеру? Конечно, это chr(x:byte), возвращает char.
***
...Если быть точным, то

Quote (Ord)

Функция Ord возвращает целочисленное значение для любого перечислимого типа Arg.
Это используется преимущественно, чтобы преобразовать символы или перечисления в их числовые эквиваленты.

Quote (Chr)

Функция Chr конвертирует целое число IntValue или в AnsiChar или в WideChar

***
Вот, тут можешь почитать описания и посмотреть примеры...

Сообщение отредактировал TimKruz - Суббота, 24.12.2011, 22:27

masb8ly-GC

Дата: Суббота, 24.12.2011, 23:05 | Сообщение # 176

участник

Сообщений: 156

Сейчас нет на сайте

Благодарю за ссылку и за потраченное на меня время!)

Сообщение отредактировал masb8ly-GC - Суббота, 24.12.2011, 23:12

RabbitNerd

Дата: Воскресенье, 25.12.2011, 14:24 | Сообщение # 177

частый гость

Сообщений: 54

Сейчас нет на сайте

На форме есть ComboBox, ListBox и Memo. Пользователь выбирает из ComboBox'a например, строку "Ололо", и ListBox приобретает Items характерные этому "Ололо". А уже Memo загружает текст, характерный для строки в ListBox'e. Пробовал сделать так:
If ComboBox1.Text='Ололо' then ListBox1.Items.Add('Ололошенька';
If ListBox1... а вот дальше как писать не знаю, ибо там ListBox1.Items= не работает

masb8ly-GC

Дата: Воскресенье, 25.12.2011, 15:01 | Сообщение # 178

участник

Сообщений: 156

Сейчас нет на сайте

А дальше все очень просто! Вводишь переменную стринговую к примеру s и пишешь:

Code

s := lst1.Items[lst1.ItemIndex];
if (s='Ололошенька') then
begin
//пиши, что нужно
end;

Stage

Дата: Воскресенье, 25.12.2011, 16:24 | Сообщение # 179

постоянный участник

Сообщений: 289

Сейчас нет на сайте

Quote

А дальше все очень просто! Вводишь переменную стринговую к примеру s и пишешь

Сравнивать лучше по индексу.

masb8ly-GC

Дата: Воскресенье, 25.12.2011, 16:34 | Сообщение # 180

участник

Сообщений: 156

Сейчас нет на сайте

Можно по индексу, а можно и по имени! Тут разницы особой нет)