/
stud_22-365
/
GLXEngine
Обзор
Документация
Войти
/
stud_22-365
/
GLXEngine
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
Examples/AdvDemos/IntensityMesh/IntensityMeshD.dpr
30 строк
1012 B
glscene
Updated cpp demos
12 янв 2026, 21:56
12 янв 2026, 21:56
a6ff57f
Код
Авторство
О чём код?
(* Shows how to use 1D palettes to visualize "intensity" on a mesh. Typical application is interactive representation of FEA (Finite Element Analysis), the palette texture can be used with discrete colors (use "nearest" filtering) or continuous colors (use "linear" filtering). Palette scale and offset can then be adjusted via texture scaling/off. Representation uses a simple multipass shader to overlay the model's wireframe using smoothed lines. Sample Data represents the Von Mises Stress (usually is used to predict steel yielding) over the structure of a tubular tower for electrical power lines. That stress is the result of the loads from cables, transversal wind and self weigth. (Sample Data contributed by Carlos Ferreira) *) program IntensityMeshD; uses Forms, fdIntensityMesh in 'fdIntensityMesh.pas' {FormIntensutyMesh}; {$R *.res} begin Application.Initialize; Application.CreateForm(TFormIntensutyMesh, FormIntensutyMesh); Application.Run; end.