Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.10.14;
Скачать: [xml.tar.bz2];

Вниз

Символ и Memo   Найти похожие ветки 

 
voe   (2007-09-21 14:52) [0]

Как мне символ " запихать в пиременую?
Как мне организовать цикл repeat  untill Memo1. ? Чтобы делать цикл до того пока там есть записи(линии)


 
DVM ©   (2007-09-21 14:54) [1]


> Как мне символ " запихать в пиременую?

переменная := """"; // это четыре апострофа а не 2 кавычки!


 
Ega23 ©   (2007-09-21 14:54) [2]


> Как мне символ " запихать в пиременую?


пирименая := """";


> Как мне организовать цикл repeat  untill Memo1. ?


repeat

until (есть записи(линии))


 
Anatoly Podgoretsky ©   (2007-09-21 14:57) [3]

> Ega23  (21.09.2007 14:54:02)  [2]

Цикл repeat  untill для мемо заранее разложеные грабли


 
voe   (2007-09-21 15:01) [4]


> Цикл repeat  untill для мемо заранее разложеные грабли

Как тогда быть? Как их обойти?


 
Ega23 ©   (2007-09-21 15:02) [5]


> Цикл repeat  untill для мемо заранее разложеные грабли


Я знаю, но ему же именно repeat - until нужен...


> Как тогда быть? Как их обойти?


Не использовать repeat-until
Использовать или while или for


 
voe   (2007-09-21 15:02) [6]

Каким оператором пользоваться для цикла?


 
voe   (2007-09-21 15:03) [7]

Как именно плиз помогите.


 
Ega23 ©   (2007-09-21 15:06) [8]


> Каким оператором пользоваться для цикла?


Использовать или while или for


> Как именно плиз помогите.


Читай хелп, там всё написано.


 
voe   (2007-09-21 15:06) [9]


> Читай хелп, там всё написано.


Вам трудно написать? Пожалуйста!


 
voe   (2007-09-21 15:11) [10]

как у memo посмотреть когда строки кончились? Или кол-во строк?


 
Ega23 ©   (2007-09-21 15:20) [11]


> как у memo посмотреть когда строки кончились? Или кол-во
> строк?


Memo.Lines.Count


 
voe   (2007-09-21 15:30) [12]

Что значит?
Чем Delphi неугодил мой цикл for?
[Warning] Unit1.pas(199): For loop control variable must be simple local variable

Спасибо

> Memo.Lines.Count


 
DVM ©   (2007-09-21 15:32) [13]


> как у memo посмотреть когда строки кончились? Или кол-во
> строк?


i := 0;
while Memo.Lines.Count > 0 do
 begin
   //например, удаляем
   Memo.Lines[i].Delete;
   inc(i);
 end;


 
Anatoly Podgoretsky ©   (2007-09-21 15:32) [14]

Никакого твоего цикла нет


 
DVM ©   (2007-09-21 15:33) [15]

т.е. Мemo.Lines.Delete(i);


 
Ega23 ©   (2007-09-21 15:37) [16]

i := 0;
while Memo.Lines.Count > 0 do
begin
  //например, удаляем
  Memo.Lines.Delete(i);
  inc(i);
end;


Memo.Clear ?


 
voe   (2007-09-21 15:42) [17]

как прочесть данные из memo например 1 строки


 
voe   (2007-09-21 15:47) [18]

Поедеи memo1.Lines.ValueFromIndex[i]   где i номер строки.
Но он ничего ненаходт.
Нумерация строк начинается с нуля


 
Плохиш ©   (2007-09-21 15:50) [19]


> DVM ©   (21.09.07 15:32) [13]


> DVM ©   (21.09.07 15:33) [15]

Домашнее задание, при удалении какой строки вывалиться исключение :-))
> voe

Иди читай букварь, это конференция для начинающих, а не для халявщиков без желания думать.


 
voe   (2007-09-21 15:55) [20]


> Иди читай букварь, это конференция для начинающих, а не
> для халявщиков без желания думать.


Ладно тебе. Просто надо дописать прогу побыстрей. Помоги.


 
Ega23 ©   (2007-09-21 15:57) [21]


> Ладно тебе. Просто надо дописать прогу побыстрей. Помоги.


Сколько?


 
voe   (2007-09-21 16:00) [22]

Что сколько?
ЗА прогу? всеволиш утили специализированная.
нужно по циклу читать из memo и пихать в переменную.


 
engine ©   (2007-09-21 16:00) [23]

> [20] voe   (21.09.07 15:55)

Батонов накидал, осталось только прогу написать?


 
Сергей М. ©   (2007-09-21 16:02) [24]

for i := 0 to Memo.Lines.Count - 1 do
  Переменная := ПихатьВПеременную(Memo.Lines[i]);


 
voe   (2007-09-21 16:05) [25]


> engine ©   (21.09.07 16:00) [23]
> > [20] voe   (21.09.07 15:55)
>
> Батонов накидал, осталось только прогу написать?

Нет.
Работа с БД реализованно, просто надо перечень вводить для select. вводить в memo и в цикле вставлять в SQL запрос


 
Ega23 ©   (2007-09-21 16:07) [26]


> Что сколько?


Сколько денег ты готов заплатить за готовое решение, если сам нихрена сделать не можешь (да и не хочешь)?


 
Плохиш ©   (2007-09-21 16:08) [27]

sql.text := "select " + memo1.lines.commatext + "<чевой-то там>"


 
DVM ©   (2007-09-21 16:08) [28]


> Ega23 ©   (21.09.07 15:37) [16]
>
> Memo.Clear ?

так ему же цикл


> Плохиш ©


> > DVM ©   (21.09.07 15:33) [15]
>
> Домашнее задание, при удалении какой строки вывалиться исключение
> :-))

:) Прям задание на внимательность получилось.


 
Плохиш ©   (2007-09-21 16:09) [29]


> Ega23 ©   (21.09.07 16:07) [26]

Откуда у него деньги, он даже милостыню просить не умеет...


 
Ega23 ©   (2007-09-21 16:15) [30]


> так ему же цикл


это аргумент...   :)


 
voe   (2007-09-21 16:22) [31]

Злые вы!


 
Ega23 ©   (2007-09-21 16:22) [32]


> Злые вы!


А ты - халявщик.


 
Плохиш ©   (2007-09-21 16:23) [33]


> voe   (21.09.07 16:22) [31]
> Злые вы!

Да, да они все злюки, один я добрый...


 
Ega23 ©   (2007-09-21 16:24) [34]


> Да, да они все злюки, один я добрый...


да-да, щас как выложишь на своей мове...  :)


 
DVM ©   (2007-09-21 16:29) [35]

Я самый тут добрый


 
Anatoly Podgoretsky ©   (2007-09-21 16:33) [36]

> voe  (21.09.2007 15:55:20)  [20]

Не надо, чревато.
Тебе пока еще рано.


 
Сергей М. ©   (2007-09-21 16:35) [37]


> Ega23 ©   (21.09.07 16:22) [32]


Он не халявщик, он партнер)


 
Anatoly Podgoretsky ©   (2007-09-21 16:39) [38]

> Сергей М.  (21.09.2007 16:35:37)  [37]

Мы сидим, а денежки идут.


 
Denis_ ©   (2007-09-21 18:30) [39]

пиременая:=пиременая+#39;



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.10.14;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.53 MB
Время: 5.939 c
15-1189541777
Nous Mellon_
2007-09-12 00:16
2007.10.14
php + ftp


2-1190494288
Pa5ha
2007-09-23 00:51
2007.10.14
Адрес метода класса :)


1-1186067664
Кирилл_А
2007-08-02 19:14
2007.10.14
GDI+


2-1190115937
F@T@L_Err0r
2007-09-18 15:45
2007.10.14
MediaPlayer


2-1190279181
zzzz
2007-09-20 13:06
2007.10.14
компонент cxTextEdit





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский