как делать 2D анимацию на форме (читать всё…)

ак сделать, так чтобы при установке ограничения времени,к примеру на 30 сек,через 30 сек вышло Showmessage ВРЕМЯ ВЫШЛО! потом и так далее для 1 мин,2 мин,5 мин для кнопки GO (читать всё…)

Как переделать Delay, чтобы можно было в 10Mks выставить? Пробовал разные значения подставлять, но все равно в миллисекундах не получается.

raxp

procedure delay_microsec(val: int64);

var Freq, TimeImp, TimeImpNow, TimeElapsed: int64;

begin

 QueryPerformanceFrequency(Freq);

 QueryPerformanceCounter(TimeImp);

 repeat

  QueryPerformanceCounter(TimeImpNow);

  TimeElapsed:= ((TimeImpNow - TimeImp) * 1000000) div Freq;

 until TimeElapsed > val

end;

Пеллетные камины и котлы испанского производства EcoForest

тема на форуме

(читать всё…)

Есть форма, есть кнопки с названием разделов, есть ричэдит. При нажатии на кнопку подгружаем файл в ричэтид. Юзер его читает, потом выбирает другой раздел, при этом меняется только путь к файлу и он видит другой текст. Как определить, сколько времени читал текст юзер до перехода в другой раздел? Если бы каждый раздел был в новой форме, проблем бы не было, просто событие onclose или подобное. (читать всё…)

Как в Delphi реализовать движение изображения из точки А в точку В при нажатие кнопки Button1? (читать всё…)

Через определенное время должно меняться изображение, например 10 изображения в секунду. (читать всё…)

Нужно завершить работу программы, по окончании обратного отсчета, который отображается в заголовке формы. Как реализовать? (читать всё…)

К примеру нажимаю я button1 и появляется изображение. Через, допустим, 5 сек, оно исчезает. Как это сделать? (читать всё…)

Суть задачи: нужно сделать так, чтобы изображение двигалось по кругу в форме. Припустим, что форма размером 800х600 и небольшая картинка, движение которой нужно зациклить. Функцию круга я знаю y^2+x^2=R^2 (читать всё…)