Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
CrossExE
10 / 10 / 2
Регистрация: 03.04.2010
Сообщений: 160
1

Сократить...

17.04.2010, 16:59. Просмотров 952. Ответов 3
Метки нет (Все метки)

procedure TForm1.Button1Click(Sender: TObject);
var
sm:integer;
begin
sm := ShowMessage;
sm ('надо сократить чтоб постоянно не писать ShowMessage, как это слелать');
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.04.2010, 16:59
Ответы с готовыми решениями:

Сократить код
Сократите пожалуйста код, если это возможно, заранее спасибо! unit Unit1; interface uses ...

Сократить код
Есть кусок кода, он рабочий, хотелось бы сделать его компактнее. Вероятно case и массивы, но чёсь...

Сократить код
Приветствую всех) Помогите сократить код) if...

Сократить код Делфи
Ребята, прошу помогите, я уже устал ломать голову, последняя надежда на вас. Условие задачи:...

Как сократить код?
Может кто знает как сделать эти 2 кода компактными: procedure TForm5.Button1Click(Sender:...

3
Жека-старший
Студент
497 / 345 / 162
Регистрация: 15.03.2010
Сообщений: 601
17.04.2010, 17:25 2
поконкретней задание...
что именно сократит?
ShowMessage- оно же выдает сообщение...а не как иначе, нельзя присваивать переменной, можно например InputBox('','','');
1
anburadeon
1 / 1 / 1
Регистрация: 23.06.2009
Сообщений: 17
17.04.2010, 17:26 3
это встроенная функция, её нельзя сократить
пользуйся копипастом ;)
0
STRATEG
1160 / 466 / 82
Регистрация: 04.03.2010
Сообщений: 1,013
17.04.2010, 17:46 4
Конечно же вопрос очень не корректный,код неверный....ну вот возможная реализация того что ты хотел

Delphi
1
2
3
4
procedure SM(Msg:string);
Begin
ShowMessage(Msg);
End;
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.04.2010, 17:46

Сократить путь к файлу
Забыл фк-цию, т.к. с дельфи 3 месяца не работал :с Открываю файл диалогом. Нужно из пути к файлу...

Автоматически сократить ФИО
Здравствуйте! Ребята подскажите есть ФИО в Edit1 (Иванов Иван Иванович), как сделать что бы...

сократить до одной строчки?
LabeledEdit1.Clear; LabeledEdit2.Clear; LabeledEdit3.Clear; LabeledEdit4.Clear; ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru