Вопросы по оптимизации скорости

[Иллидан]

var
b:integer;
a:array [1..40 ] of integer;
1) b=10
2) a[1]=10;

var
a:integer;
c:record
a:integer;
end;
1) a=10;
2) c.a=10;
Будет ли 1) выполняться быстрее чем 2), если да, то на сколько?

[alexBlack]

Все приведенные варианты присвоения компилируются в

mov [xxx], 0Ah

cледовательно разницы не будет

[Ozerich]

Попробуй сам измерь.
Делай так

var
a:int64;
begin
a:=GetTickCount;
//тут действия
a:=GetTickCount-a;
Label.caption:=inttostr(a);
end;

[Иллидан]

Все приведенные варианты присвоения компилируются в

mov [xxx], 0Ah

cледовательно разницы не будет

Проверил. Получил разные результаты по времени для
1) a:=10;
2) c.a:=10; ?

[Иллидан]

Кто-нибудь может объяснить почему так?

[alexBlack]

Сообщение от Иллидан

Проверил. Получил разные результаты по времени для
1) a:=10;
2) c.a:=10; ?

Скорее всего зависит от того, где объявлены переменные. Для глобальных переменных, как я уже говорил инструкции одинаковы (и время выполнения одинаково):

function RDTSC: integer;{int64} assembler;
asm
  db $0F,$31 // RDTSC
end;

type Tc = record
       a : integer;
     end;
var b:integer;
    c:TC;

procedure TForm1.Button1Click(Sender: TObject);
var T:integer;
begin
   T := RDTSC;
   b    := 10;  // mov [xxx], 0a
   T := RDTSC - T;
   showMessage(intToStr(T));  // 80

   T := RDTSC;
   c.a   :=10;  // mov [xxx], 0a
   T := RDTSC - T;
   showMessage(intToStr(T));  // 80
end;

Для локальных переменных обращение к струтурам и массивам - это:

mov edi, 0ah
mov [ebp-xxx], edi

обычные переменные компилятор может разместить в регистрах

например, mov esi, 0ah

(а может и в стеке и тогда будут точно такие же инструкции как для структур) Может отсюда и разница во времени выполнения. У меня, например, один компилятор дал одинаковое время, второй разное, но только для локальных переменных. Для глобальных переменных время всегда одинаковое.

[Иллидан]

Сообщение от rpy3uH

без разницы! всё происходит с одинаковой скоростью будь переменная в классе, локальная переменная, глобальная, в другом юните. всё одинаково. за исключением случаев типа

    procedure SetXXX(const Value: integer);
    function GetXXX:integer;

    property XXX:integer read GetXXX write SetXXX;

в данном случае время обращения к свойству полностью зависит от функций GetXXX, SetXXX.

Так все-таки есть разница между скоростью обращения к глобальным
и локальным переменным?

Проверил код(a:=10 и c.a:=10) на старушке BP(с глобальными переменными) выдает разные результаты по скорости.

[alexBlack]

Сообщение от Иллидан

Так все-таки есть разница между скоростью обращения к глобальным
и локальным переменным?

Проверил код(a:=10 и c.a:=10) на старушке BP(с глобальными переменными) выдает разные результаты по скорости.

Разные компиляторы по-разному транслируют текст программы в коды процессора. В BP, насколько помню, тоже было окно CPU. Посмотрите какие команды ассемблера генерирует компилятор и смотрите время их выполнения в руководстве по процессору. То есть ответ "есть ли разница между скоростью обращения к глобальным и локальным переменным" зависит от используемого компилятора.

Да и зачем это нужно ? Разница, даже если она есть настолько незначительна, что это не даст выигрыша в скорости. Искать слабые места нужно в другом месте - длинные циклы, сложные вычисления...

[Иллидан]

Разные компиляторы по-разному транслируют текст программы в коды процессора. В BP, насколько помню, тоже было окно CPU. Посмотрите какие команды ассемблера генерирует компилятор и смотрите время их выполнения в руководстве по процессору. То есть ответ "есть ли разница между скоростью обращения к глобальным и локальным переменным" зависит от используемого компилятора.

А если все таки взять компилятор Дельфы 7 что будет в нем?

Да и зачем это нужно ? Разница, даже если она есть настолько незначительна, что это не даст выигрыша в скорости. Искать слабые места нужно в другом месте - длинные циклы, сложные вычисления...

Ок, тогда такие вопросы если, не сложно: что работает быстрее goto или continue? Какой самый быстрый способ написать(нарисовать в т. с коорд. x,y) слово на форме, что-бы расстояние между буквами было равно заданному число?

[alexBlack]

Сообщение от Иллидан

А если все таки взять компилятор Дельфы 7 что будет в нем?

Если просто из любопытства, то сделать тестовый пример и посмотреть результаты. Пример я приводил.

Ок, тогда такие вопросы если, не сложно: что работает быстрее goto или continue?

Не думаю что есть какая-то разница. Еще раз. Метод получения ответов на такие вопросы очень прост. Открываем окно CPU, смотрим какой код генерирует компилятор на интересующую нас инструкцию и прикидываем время выполнения инструкций.

Какой самый быстрый способ написать(нарисовать в т. с коорд. x,y) слово на форме, что-бы расстояние между буквами было равно заданному число?

procedure TForm1.FormPaint(Sender: TObject);
begin
   Canvas.Font.size := 14;
   SetTextCharacterExtra(Canvas.Handle, 10 {заданное число});
   Canvas.TextOut(10, 10, 'String info');
end;