|
Вопрос # 4 907/ вопрос открыт / |
|
Здравствуйте!
Скажите как сослаться на номер строчки из Memo ну тоесть указать в коде номер строчки
 |
Вопрос задал: Адмирал (статус: Посетитель)
Вопрос отправлен: 11 января 2011, 12:47
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: min@y™
var
S: string;
Index, Count, Len, j: Integer;
Symbol: Char;
begin
Count:= Memo.Lines.Count; // кол-во строк в мемо
S:= Memo.Lines[Index]; // прочесть в переменную S строку №Index (0 <= Index < Count)
Memo.Lines[Index]:= S; // Заменить строку №Index (0 <= Index < Count) на содержимое S
Len:= Length(Memo.Lines[Index]); // длина строки №Index (0 <= Index < Count)
Symbol:= Memo.Lines[Index][j]; // j-й символ (1 <= j <= Len) строки №Index (0 <= Index < Count)
// ну и и т.д. и т.п.
end;
 |
Ответ отправил: min@y™ (статус: Доктор наук)
Время отправки: 11 января 2011, 12:58
Оценка за ответ: 5
Комментарий к оценке: в самый раз
|
Мини-форум вопроса
Всего сообщений: 49; последнее сообщение — 12 января 2011, 16:41; участников в обсуждении: 4.
Страницы: [« Предыдущая] [1] [2] [3]
|
Вадим К (статус: Академик), 12 января 2011, 12:46 [#41]:
выкладывать нужно *.dpr, *.pas, *.dfm, *.res как минимум. Хотя без последнего можно ещё как то обойтись.
Галочка "подтверждения прочтения" - вселенское зло.
|
|
|
Адмирал (статус: Посетитель), 12 января 2011, 12:50 [#42]:
ладно щас выложу
|
|
|
Адмирал (статус: Посетитель), 12 января 2011, 14:38 [#44]:
ну и?
|
|
|
min@y™ (статус: Доктор наук), 12 января 2011, 15:00 [#45]:
Я тут минут 10 поработал над твоей прогой.
Можно было бы много чего доделать, например, удаление и т.п.
Посмотри-ка: http://zalil.ru/30320114
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
Адмирал (статус: Посетитель), 12 января 2011, 15:01 [#46]:
скажи пожалуста что именно ты сделал, чтобы я знал
|
|
|
min@y™ (статус: Доктор наук), 12 января 2011, 15:15 [#47]:
Цитата (Адмирал):
скажи пожалуста что именно ты сделал, чтобы я знал
Так скачай да посмотри.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
Адмирал (статус: Посетитель), 12 января 2011, 15:28 [#48]:
как я узнаю?
|
|
|
min@y™ (статус: Доктор наук), 12 января 2011, 16:41 [#49]:
Цитата (Адмирал):
как я узнаю?
Что узнаешь?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
Страницы: [« Предыдущая] [1] [2] [3]
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
