|
�@��TTrackBar�̖ڐ���F�̕ύX�����ɂ�
|
�g�b�v�y�[�W��
�e����̉ߋ����O
�EC/C++
�EDelphi
�EVisual Basic���S��
�@(VB2-VB6��.NET���p)
�EVisual Basic(VB2-VB6)
�EVisual Basic .NET
�EVisual C++
�֘A�T�C�g
�Epapy's softwarelibrary
mato 2006/08/30(��) 11:48:32
OS WinXP Pro SP1
Delphi 7 Pro
TTrackBar�̖ڐ���F�͍����K��l�ł��������
�ύX������@�ׂĂ��܂��B
�ȑOProgressBar�̐F��ύX���邽��
var
FColor: TColor;
begin
FColor := clLime;
SendMessage(FProgress.Handle, PBM_SETBARCOLOR, 0, LPARAM( FColor ) );
�Ƃ������@��Ƃ����̂ŁA���l�̎�@��p���悤��CommCtrl.pas��
���������̂ł����ATRACKBAR_CLASS�ɂ͖ڐ���̐F��ݒ�ł���悤��
���ڂ��������炸�s���l���Ă��܂��B
�Q�l�ƂȂ����������̕���������Ⴂ�܂�����
���������肢���܂��B
���[�� 2006/08/30(��) 14:55:20
> ���l�̎�@��p���悤��CommCtrl.pas��
TrackBar �̖ڐ���̐F��ς���悤�ȃ��b�Z�[�W�́A����������܂���B
��H 2006/08/30(��) 15:03:38
> TrackBar �̖ڐ���̐F��ς���悤�ȃ��b�Z�[�W�́A����������܂���B
�w�i�Ȃ�A�R���ŕς��邱�Ƃ��ł������ł����˂��B�B�B
http://delphianworld.run.buttobi.net/compo/gaugebar.html#GB0009
mato 2006/08/30(��) 18:59:40
�R�����g���肪�Ƃ��������܂��B
��͂薳�������ł����B�B�B
�c�O�ł���TickStyle��tsNone�ɐݒ肵��
Label��Image�Ŗڐ����ǂ���쐬���悤�Ǝv���܂��B
���肪�Ƃ��������܂����B
