Главная страница
    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.039 c
14-1096491462
jack128
2004-09-30 00:57
2004.10.17
В продолжение "Что такое сабж, ИМХО, ошибка в 17 строке " и тд.


14-1096109267
X9
2004-09-25 14:47
2004.10.17
NRG 2 ISO


4-1095169575
ipnet
2004-09-14 17:46
2004.10.17
Запись значения REG_SZ в реестр под XP


14-1096456548
BAYES
2004-09-29 15:15
2004.10.17
Что могло срубить дельфи?


3-1095857763
Новенький
2004-09-22 16:56
2004.10.17
Помогите с фильтрацией





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