Search options (Page 1 of 2)

Здравствуйте! По предыдущему посту разобрался. Возник другой вопрос: как получить из двух переменных одну?
Например, для разных функций нужно получить переменные num1, num2, num3 из "num" и "a:=1", "a:=2" и "a:=3".
Функции однотипные, хочу сократить объем кода не используя переборы. Переменная не имеет привязки к компонентам.
К примеру, в языке луа есть оператор ".." для сцепления. В нем нужная мне переменная выглядела бы так - num..a, и в зависимости от функции она будет возвращать num1, num2 или num3. Но как подобное сделать в дельфи?
Перерыл кучу форумов, но ответ найти не смог.

Здравствуйте! Наверное, замечание не совсем в тему...
Программа версии 6.5 закрывается при малейшей ошибке, что нередко очень мешает. С предыдущими версиями, не имевшими такового новшества, было удобнее работать. Проблемная строка в конструкторе выделяется - это круто, но часто перезапускать БД то еще "удовольствие"...

Вот оно! Огромное спасибо!

Увы, Ваш вариант не работает. Как я только не пробовал. Даже с 1 не работает. Кроме того, наверное, в nameCombo не нужна точка после ComboBox, ведь тогда, по логике, получится 'Form1.ComboBox.1.Clear' вместо 'Form1.ComboBox1.Clear'.

Upd: С Label и Edit подобные схемы работают. Может, для ComboBox нужно нечто другое?

Можно с этого места подробнее? Хранить-то шрифт не проблема, а как его задействовать?

Видимо, для кого-то это меньшее из зол

Вы про какую концепцию? Я искал решение этого вопроса на форумах по Дельфи, и что-то даже нашел, но, увы, не понял, как это все работает. Предлагалось создать некий RC файл, как-то его то ли проверять, то ли регистрировать. А затем уже при открытии формы устанавливать файл шрифта (в ОС, как я понял), а при закрытии формы - удалять (просто чтобы не мусорить на другом компе). Если б такое можно было бы сделать в MVD, было бы хорошо.

Здравствуйте!
Как закрепить компонент Label в определенном месте на форме для получения эффекта центрирования (как в Word, например)? Чтобы Label вне зависимости от количества символов все время был "по центру".
И можно ли в Label переносить не по одному слову, а в определенных рамках, как в Memo?

Спасибо!
Сделал так:
var
   key: array[1..10] of string;
   value: array[1..10] of string;

//Ваши функции...

begin
   key[1]:'k1';key[2]:'k2';.....key[10]:='k10';
   value[1]:'v1';value[2]:'v2';.....value[10]:='v10';
end.
Пока все работает.

А что насчет альтернативных способов прописывания путей?

Здравствуйте!
В скрипте, при вводе текста, а именно любых слов, заканчивающихся на букву "я" (например, так: Form1.Edit1.Text:='Земля'), меняется цвет некоторой части следующего за этим словом кода (синеет), из-за чего становится проблематично работать с ним. Приходится ставить пробел после слова (или_), и все подобные значения сохранять так же.
Данное явление заметил еще в версиях 5.х, но не придал этому значения, потому как не было критично. Сейчас ситуация изменилась...

Здравствуйте!
Возникла необходимость в повторении однотипного кода. Чтобы не нагружать скрипт, планирую выделить необходимый код в отдельную функцию, чтобы потом просто вызвать ее. Однако не могу понять, как правильно осуществить вызов.

   procedure Hide_Components (Sender: TObject);
var
    i: integer;
    lr,lrd,lrpc: TLabel;
    er: TEdit;

begin
    for i:= 1 to 10 do 
    begin
        lr:=TLabel(Form2.FindComponent('LRes'+IntToStr(i)));
        lrd:=TLabel(Form2.FindComponent('LResDelta'+IntToStr(i)));
        lrpc:=TLabel(Form2.FindComponent('LRespc'+IntToStr(i)));
        er:=TEdit(Form2.FindComponent('ERes'+IntToStr(i)));
        lr.Enabled:=false;
        lrd.Enabled:=false;
        lrpc.Enabled:=false;
        er.Enabled:=false;
        er.Text:='';
    end;
end;

Должно получиться нечто вроде

procedure Form2_Button1_OnClick(Sender: TObject);
begin
    if .... rhen
    .......
    Hide_Components ();
end;

Я не прошу писать за меня готовое решение - понимаю, что работы и помимо этого навалом. Но, возможно, Вы точно знаете, где можно подсмотреть пример для моего случая? Возможно, решение есть в известных Вам проектах. На сторонних форумах, которые я изучал, по подобным вопросам в основном приводятся примеры с простейшими математическими вычислениями (типа а+в), что мне не подходит.
Заранее благодарю за любую помощь.

Здравствуйте!
Реализуемо ли "групповое" изменение свойств компонентов? Что имеется ввиду: когда компонентов много (штук 20), и все их нужно, к примеру, отключить (через Enabled), то приходится отключать каждый в отдельности. Было бы гораздо удобнее выделив все компоненты в Свойствах компонентов получить общие настройки, и всего 1 нажатием перевести все 20 штук в тот же Enabled false.
Конечно, можно это, наверное, и скриптами сделать, но не охота раздувать многострадальный скрипт:)

Спасибо большое за помощь!