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

Вниз

Как по ходу прогона программы создавать ...   Найти похожие ветки 

 
RedDragon   (2004-09-29 21:27) [0]

Здравствуйте! Я хочу узнать, как мне это сделать:
1)На форме есть строка TEdit и кнопка.
И например, если я в строку ввожу число  "4"(макс - 10), то у меня создаётся 4 компонента TRadioButton.
2)На форме есть строка TEdit и кнопка.
И например, если я в строку введу Сидоров Иван и нажму на кнопку, то программа создаёт в папке файл с название "Сидоров Иван.txt". И если,например, я ввожу Иванов Петя и нажимаю на кнопку, тогда программа проверяет если файл с таким названием и если такой файл есть, то он пишет - "Вы уже голосовали". Но пишет через ShowMessage.


 
Anatoly Podgoretsky ©   (2004-09-29 21:37) [1]

Так что создавать


 
Trim ©   (2004-09-29 21:50) [2]

1.

var rb:TRadioButtion;
   I:Integer;
begin
 for i:=1 to N{Нужно количество RadioButton} do
   begin
     rb:=TRadioButton.Create(Form1{Имя твоей формы});
     rb.Parent:=Form1{Имя элемента на котором RadioButton должны лежать в данном случае сама форма };
     rb.Top:=I*16+10;
     rb.Left:=16;
     rb.Caption:="RadioButtion №"+IntToStr(I);
   end;
end;


а надо ли  TRadioButton? может лучше один TRadioGroup.
в Items заносишь сколько надо строк.
выбранную строку считываешь из ItemIndex


 
begin...end ©   (2004-09-29 21:54) [3]


>  RedDragon   (29.09.04 21:27)

TComponent.Create(); CreateFile; FileExists; ShowMessage; if ... then ... else ... .


 
Trim ©   (2004-09-29 22:08) [4]

2.

var SL:TStringList;
begin
 if FileExists(Edit1.Text+".txt")
   then ShowMessage("Вы уже голосовали")
   else
     begin
       SL:=TStringList.Create;
       SL.Add("Пишем");
       SL.Add("Нужно");
       SL.Add("В");
       SL.Add("Файл");
       SL.SaveToFile("Edit1.Text+".txt"");
       SL.Free;
     end;
end;


 
RedDragon   (2004-09-30 21:34) [5]

можно и TRadioGroup....
А ещё подскажите как сделать так:
Только напишите весь текст:
1)У меня есть строка Edit и кнопка,
в строку вводиться количество постов - появляется стоько строк едит и кнопок, сколько указано постов...
2)А когда вводишь в эти появившиеся строки(строки кол-ва кандидатов)появляется ещё столько же строк кандидатов, в которые можно ввести фамилию и имя кандидата.


 
panov ©   (2004-09-30 21:39) [6]

Для новых вопросов нужно создавать новые ветки.



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

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

Наверх




Память: 0.46 MB
Время: 0.043 c
6-1092351674
Shados
2004-08-13 03:01
2004.10.17
TThread и пинг списка хостов


1-1096418769
QuestionX
2004-09-29 04:46
2004.10.17
Способ хранения информации


4-1095343723
Ezhik
2004-09-16 18:08
2004.10.17
Поиск файла


1-1096485185
sdw_syscoder
2004-09-29 23:13
2004.10.17
Структура каталогов и файлов на диске


1-1096560712
Cosinus
2004-09-30 20:11
2004.10.17
Переопределение DrawCell в StringGrid... Запутался совсем...





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский