Выборка из файла.

[StartMis]

Есть текстовый файл в нем следующий текст:
АВГДЖЗКИ
БВАПАПДЛ
ПРДЖВЛПР
ПРЩРЕКРП
ААПВАПАП
ПРОПЛДРП
КУЕУКЕКК
ФВЫАФВАФ
АДПРВПАР
БВАППАПА
ПРВАПРВР
ГЕПРАВПР

На форме две кнопки при нажатие на первую нужно произвести выборку из файла на наличие слов начинающих на "А" , "Б" , "В" и "Г". при нажатие на вторую нужно произвести выборку слов по второй букве на наличие "Д" , "Е", "Ж" ,"З". а также выборка должна производится из ранее отобранных(т.е из слов отобранных при нажатие на первую кнопку). Помогите!!!!

[StartMis]

]Wowan[ -я непрошу сделать всю программу. я прошу настовление на путь истенный с чего начать какие можно использовать функции для реализации задумоного а не сделаейте мне прогу за бабло.Люди прошу просто подсказки как сделать.

[goblinyara]

зачем какой-то модуль? всё делается элементарно... если нужны подсказки, тогда могу дать "настАвление на путь истИнный"

По нажатию на первую кнопку просматривайте весь список по первому символу каждой строки в цикле, и при условии, что первый символ из тех, что вы перечислили, заносите в другой список, а потом уже в том списке просматриваете при нажатии на вторую кнопку циклом на то, что вторая буква удовлетворяет условию, и заносите в третий список.

Обращаться к отдельному элементу строки можно так:

SomeString[x] //x - номер нужного символа.

[StartMis]

можно по подробней про SomeString[x] как пользоваться то

[mihali4]

Сообщение от StartMis

можно по подробней про SomeString[x] как пользоваться то

Строка - это массив символов, а обращаются к элементу массива по его индексу (номеру).
Например:
пусть SomeString:='ЭЛЕМЕНТ МАССИВА';
тогда SomeString[4] будет равно "М" (ЭЛЕМЕНТ МАССИВА), а SomeString[2] будет равно "Л" (ЭЛЕМЕНТ МАССИВА)

Вы бы книжку какую-нибудь скачали себе с сайта Клуба программистов...

З.Ы.

Сообщение от StartMis

SomeString как ее идентифицировать

Да что ж ты будешь делать? SomeString - это имя переменной, т.е. сам по себе идентификатор строки, которой присвоено значение 'ЭЛЕМЕНТ МАССИВА'...
Умоляю, почитайте хоть одну книжку...

[StartMis]

SomeString как ее идентифицировать

[BOBAH13]

Сообщение от StartMis

идентифицировать

Слово то какое умное var SomeString: String;
p.s. последуйте совету михалыча, на счет книжечки

[StartMis]

обьясните почему в следующем примере выдается ошибка

function on1(count:integer):boolean;
begin
SomeString:='ЭЛЕМЕНТ МАССИВА';
if SomeString[4]='М' then close;
end;

[Ошибка] Unit1.pas(46): '(' expected but ';' found

[mihali4]

Сообщение от StartMis

обьясните почему в следующем примере выдается ошибка
function on1(count:integer):boolean;
begin
SomeString:='ЭЛЕМЕНТ МАССИВА';
if SomeString[4]='М' then close;
end;

[Ошибка] Unit1.pas(46): '(' expected but ';' found

У вас раньше выдается основная ошибка, а эта - уже непредсказуемое следствие.
А основная ошибка у вас предшествует этой и звучит так:
[Error] Unit1.pas(45): Undeclared identifier: 'SomeString'

Так ведь?
Что в переводе на русский означает - "необъявленный идентификатор 'SomeString' "
Вы в курсе, что переменные нужно объявлять?

Еще раз настоятельно рекомендую почитать книжку. Скачайте вот тут, любую, какая понравится:
http://www.programmersclub.ru/
Или зайдите во вторую тему раздела "Общие вопросы Delphi", там тоже полно ссылок на литературу.
А может, вы просто читать не умеете?

[StartMis]

извените нето дал вот непонятная мне ошибка в следующем примере

function on1:boolean;
var stroka:string;
begin
kol1 := TStringList.Create;

for i:=0 to base.Count-1 do
begin
if (base.Strings[i])[1]='а' then
kol1.Add(base.Strings[i]);
end;
end;

все компилируется но при прогоне выдает ошибку