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

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

Как можно подставить в сообщение определенный текст? [D3, Win95/98]


stupid ©   (2002-05-23 18:28:00) 

Например, при проверки Checkbox"сов. Что-то вроде этого:

var
p:string;

if Checkbox1.Checked then
p:= "Имя файл1";

if Checkbox2.Checked then
p:= "Имя файл2";

Showmessage("Ваш файл " +p+ " не найден !");


Нужно, чтобы в сообщение попали оба файла.


Dimous   (2002-05-24 13:22:00) [1]

Извиняюсь

...
if Checkbox2.Checked then
p:=p+"Имя файл2"+", ";
...


Dimous   (2002-05-24 13:19:00) [2]

А если так:

var p:string;
p:="";
if Checkbox1.Checked then
p:=p+"Имя файл1"+", ";
if Checkbox2.Checked then
p:=p+"Имя файл2";
if Length(p)<>0 then
begin
SetLenth(p,Length(p)-2);
Showmessage("Ваш файл " +p+ " не найден !")
end;

Не пойдет?


MBo   (2002-05-23 18:31:00) [3]

Showmessage("Ваши файлы " +p1+", "+p2+ " не найдены !");
;)


Наверх

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