|
Delphi:Вопрос-Ответ
| |
| TimKruz | Дата: Понедельник, 19 Декабря 2011, 23:03 | Сообщение # 161 |
старожил
Сейчас нет на сайте
| Quote (vicu2010) та включил я его, там какие-то диски Y
Там можно ввести буква_диска: (C: D: E: и т.д.) и попасть на нужный диск...
|
|
|
| |
| vicu2010 | Дата: Понедельник, 19 Декабря 2011, 23:14 | Сообщение # 162 |
Сейчас нет на сайте
| Quote (TimKruz) Там можно ввести буква_диска: (C: D: E: и т.д.) и попасть на нужный диск...
ого, пасиб)
 
Программист Ruby on Rails / COBOL | Веб-дизайнер(Bootstrap, HTML5, JS) | Викверс на Construct 2 / Classic
|
|
|
| |
| arys | Дата: Пятница, 23 Декабря 2011, 21:00 | Сообщение # 163 |
почетный гость
Сейчас нет на сайте
| Всем привет! Помагите плз!! Сейчас начнется олимпияда! Очень надо! Продлится 5 часов, 3 задачи. Я живу в Казахстане, и не думаю что я отобью у ково нибудь место. И "- Каждый должень делать сам", да да... , каждый должен нахадить пути решения задания)))) Добавлено (23.12.2011, 21:00)
---------------------------------------------
Всем ещё раз привет.Нуббский вопрос: как сделать так что бы сделать типа некст рума(гамака)???
500 символов не хватит, а писать начало... нету смысла без конца..
|
|
|
| |
| LunarPixel | Дата: Пятница, 23 Декабря 2011, 21:28 | Сообщение # 164 |
старожил
Сейчас нет на сайте
| Создаешь несколько форм, на первой, основной форме ставишь кнопку и по нажатию на неё пишешь, например:
form1.visible:=false;
form2.showmodal;
И не забудь в uses объединить все unit-ы форм, хотя это должно произойти автоматически, появится соответствующее сообщение.
|
|
|
| |
| arys | Дата: Пятница, 23 Декабря 2011, 22:08 | Сообщение # 165 |
|
почетный гость
Сейчас нет на сайте
| А можно по другому? Без форм.
500 символов не хватит, а писать начало... нету смысла без конца..
|
|
|
| |
| masb8ly-GC | Дата: Пятница, 23 Декабря 2011, 23:39 | Сообщение # 166 |
постоянный участник
Сейчас нет на сайте
| Делай видимыми и невидимыми обьекты, а не формы! Все можно на одной форме)
Backend Developer ESIS
Client Side Developer Room8Studio
Technical Leader Lucid Reality Labs
Chief Technology Officer The Intruders
Chief Technology Officer RoyalePlay Games
|
|
|
| |
| TimKruz | Дата: Суббота, 24 Декабря 2011, 19:19 | Сообщение # 167 |
|
старожил
Сейчас нет на сайте
| Quote (arys) Всем ещё раз привет.Нуббский вопрос: как сделать так что бы сделать типа некст рума(гамака)???
Ну всё зависит от того, что ты делаешь. Если игру - то просто, например, загружаешь файл с описанием второй комнаты, и рисуешь её. Если программа - то просто скрываешь не нужные компоненты (visible:=false) и показываешь нужные (visible:=true), а размещаешь их заранее.
P.S. "то просто", "то просто"... У меня всё просто... 
***
Quote (LunarPixel) Создаешь несколько форм, на первой, основной форме ставишь кнопку и по нажатию на неё пишешь, например:
form1.visible:=false;
form2.showmodal;
И не забудь в uses объединить все unit-ы форм, хотя это должно произойти автоматически, появится соответствующее сообщение.
Ну, если реально не приходится делать несколько форм, то делать так плохо. Лучше всего, когда всё на одной форме - красивей, компактней, меньше ресурсов потребляет...
Сообщение отредактировал TimKruz - Суббота, 24 Декабря 2011, 19:21 |
|
|
| |
| masb8ly-GC | Дата: Суббота, 24 Декабря 2011, 20:15 | Сообщение # 168 |
|
постоянный участник
Сейчас нет на сайте
| Здравствуйте! Возможно ли как-то записать в memo текст подряд? Потому, что если я использую mmo1.lines.append(n), то каждый символ добавляется на новую строку, а мне нужно чтобы все символы шли подряд!
Backend Developer ESIS
Client Side Developer Room8Studio
Technical Leader Lucid Reality Labs
Chief Technology Officer The Intruders
Chief Technology Officer RoyalePlay Games
|
|
|
| |
| karuy | Дата: Суббота, 24 Декабря 2011, 20:35 | Сообщение # 169 |
|
заслуженный участник
Сейчас нет на сайте
| Code Memo1.Lines.Text:=Memo1.Lines.Text+Str; |
|
|
| |
| masb8ly-GC | Дата: Суббота, 24 Декабря 2011, 21:28 | Сообщение # 170 |
|
постоянный участник
Сейчас нет на сайте
| Премного благодарен!)
Спасибо!)Добавлено (24.12.2011, 21:28)
---------------------------------------------
И еще один вопросик! Почему ord работает только с конкретным символом, но не работает с переменной содержащей этот символ?
Backend Developer ESIS
Client Side Developer Room8Studio
Technical Leader Lucid Reality Labs
Chief Technology Officer The Intruders
Chief Technology Officer RoyalePlay Games
|
|
|
| |
| TimKruz | Дата: Суббота, 24 Декабря 2011, 21:54 | Сообщение # 171 |
|
старожил
Сейчас нет на сайте
| 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 Декабря 2011, 21:58 |
|
|
| |
| masb8ly-GC | Дата: Суббота, 24 Декабря 2011, 22:00 | Сообщение # 172 |
|
постоянный участник
Сейчас нет на сайте
| Точно char! А у меня она стринг была! Спасибо!)
Backend Developer ESIS
Client Side Developer Room8Studio
Technical Leader Lucid Reality Labs
Chief Technology Officer The Intruders
Chief Technology Officer RoyalePlay Games
|
|
|
| |
| TimKruz | Дата: Суббота, 24 Декабря 2011, 22:02 | Сообщение # 173 |
|
старожил
Сейчас нет на сайте
| Quote (masb8ly-GC) Точно char! А у меня она стринг была! Спасибо!)
Как можно забыть название типа переменной? Ну а к строке тоже так обращаться можно, только нужно указывать, к какому символу конкретно (от 1 до длины строки), в квадратных скобках.
|
|
|
| |
| masb8ly-GC | Дата: Суббота, 24 Декабря 2011, 22:17 | Сообщение # 174 |
|
постоянный участник
Сейчас нет на сайте
| Понятно) Спасибо, а есть ли какая-то функция противоположная ord?
Backend Developer ESIS
Client Side Developer Room8Studio
Technical Leader Lucid Reality Labs
Chief Technology Officer The Intruders
Chief Technology Officer RoyalePlay Games
|
|
|
| |
| TimKruz | Дата: Суббота, 24 Декабря 2011, 22:24 | Сообщение # 175 |
|
старожил
Сейчас нет на сайте
| Quote (masb8ly-GC) Понятно) Спасибо, а есть ли какая-то функция противоположная ord?
Т.е. возвращающая символ по номеру? Конечно, это chr(x:byte), возвращает char.
***
...Если быть точным, то
Quote (Ord) Функция Ord возвращает целочисленное значение для любого перечислимого типа Arg.
Это используется преимущественно, чтобы преобразовать символы или перечисления в их числовые эквиваленты.
Quote (Chr) Функция Chr конвертирует целое число IntValue или в AnsiChar или в WideChar
***
Вот, тут можешь почитать описания и посмотреть примеры...
Сообщение отредактировал TimKruz - Суббота, 24 Декабря 2011, 22:27 |
|
|
| |
| masb8ly-GC | Дата: Суббота, 24 Декабря 2011, 23:05 | Сообщение # 176 |
|
постоянный участник
Сейчас нет на сайте
| Благодарю за ссылку и за потраченное на меня время!)
Backend Developer ESIS
Client Side Developer Room8Studio
Technical Leader Lucid Reality Labs
Chief Technology Officer The Intruders
Chief Technology Officer RoyalePlay Games
Сообщение отредактировал masb8ly-GC - Суббота, 24 Декабря 2011, 23:12 |
|
|
| |
| RabbitNerd | Дата: Воскресенье, 25 Декабря 2011, 14:24 | Сообщение # 177 |
частый гость
Сейчас нет на сайте
| На форме есть ComboBox, ListBox и Memo. Пользователь выбирает из ComboBox'a например, строку "Ололо", и ListBox приобретает Items характерные этому "Ололо". А уже Memo загружает текст, характерный для строки в ListBox'e. Пробовал сделать так:
If ComboBox1.Text='Ололо' then ListBox1.Items.Add('Ололошенька';
If ListBox1... а вот дальше как писать не знаю, ибо там ListBox1.Items= не работает
|
|
|
| |
| masb8ly-GC | Дата: Воскресенье, 25 Декабря 2011, 15:01 | Сообщение # 178 |
|
постоянный участник
Сейчас нет на сайте
| А дальше все очень просто! Вводишь переменную стринговую к примеру s и пишешь:
Code s := lst1.Items[lst1.ItemIndex];
if (s='Ололошенька') then
begin
//пиши, что нужно
end;
Backend Developer ESIS
Client Side Developer Room8Studio
Technical Leader Lucid Reality Labs
Chief Technology Officer The Intruders
Chief Technology Officer RoyalePlay Games
|
|
|
| |
| Stage | Дата: Воскресенье, 25 Декабря 2011, 16:24 | Сообщение # 179 |
|
постоянный участник
Сейчас нет на сайте
| Quote А дальше все очень просто! Вводишь переменную стринговую к примеру s и пишешь
Сравнивать лучше по индексу.
|
|
|
| |
| masb8ly-GC | Дата: Воскресенье, 25 Декабря 2011, 16:34 | Сообщение # 180 |
|
постоянный участник
Сейчас нет на сайте
| Можно по индексу, а можно и по имени! Тут разницы особой нет)
Backend Developer ESIS
Client Side Developer Room8Studio
Technical Leader Lucid Reality Labs
Chief Technology Officer The Intruders
Chief Technology Officer RoyalePlay Games
|
|
|
| |
|
