Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Вопрос про Max(Memo1.Lines.Values[i]) [D7, XP]


vegarulez ©   (2008-03-30 14:38:00) 

Всем мастерам привет!
Вопрос таков - есть массив данных в тмемо
в виде:

1=a
2=b
3=c
4=d
...

Я обращаюсь к ним в цикле:

 

while i<Memo1.Lines.Count+1 do
  Begin
    Memo_nocomis.Lines.Count
   if Memo1.Lines.Values[inttostr(i)]<>'' then
    MyIniFile.WriteString('test',inttostr(i),Memo1.Lines.Values[inttostr(i)]);
   inc(i);
  End;


так вот собственно говоря вопрос - бывает так что допустим:

1=a

3=c
4=d

т.е. мне тогда надо всё записать в инишник как

1=a
2=c
3=d

а для этого нужно знать max i  в Memo1.Lines.Values[]..., чтобы потом правильно циклом добегать до последнего значения, при этом если нет промежуточного, то делать допустим  j:=i-1 и писать в инифайл под индексом j.

Поэтому вопрос как узнать max в  i  в Memo1.Lines.Values[]?


Andy BitOff   (2008-03-30 16:42:00) [1]

И вообще меня запутал. Не + а - в Count. В общем учи матчасть.


Andy BitOff   (2008-03-30 16:41:00) [2]

Хотя нет. Про твой max, это не так, вроде. Фиг поймешь, что ты хочешь.
Теперь я понял это как Memo1.Lines.Values[Memo1.Lines.Count - 1]
А ты уж понимай как хочешь.


Andy BitOff   (2008-03-30 16:36:00) [3]

По твоему коду.

j := 1;
while i<Memo1.Lines.Count+1 do
 Begin
   Memo_nocomis.Lines.Count
  if Memo1.Lines.Values[inttostr(i)]<>'' then begin
   MyIniFile.WriteString('test',inttostr(j),Memo1.Lines.Values[inttostr(i)]);
   inc(j);
  end;
  inc(i);
 End;

А "max в i в Memo1.Lines.Values[]?" в этом понимании, это Memo1.Lines.Count + 1

А вообще х... занимаешься. Описал бы задачу, тебе бы подсказали более грамотное решение.


vegarulez   (2008-03-30 16:13:00) [4]

хм... а советы по существу..?


Сергей М.   (2008-03-30 15:33:00) [5]

Если "цирковой номер" состоит в "приспособе" strings а-ля ini, то точно к терапевту.


Сергей М.   (2008-03-30 15:28:00) [6]

Мож 03 позвониь ..


Palladin   (2008-03-30 15:18:00) [7]

Господи, какой только ерунды не пишут...


Наверх

Титульная страница Поиск, карта сайта Написать письмо