Jak w zadarzeniu OnChange daje:
[code]Memo1.Width:=SpinEdit1.value[/code]
to szerokość Memo zmienia się tylko jak naciskam stżalki.
Jak zaznacze cyfry i nacisne jkąś liczbe na lawatuze to program robi sie STOPPED i wyskakuje jakieś okienko - błąd.
Może ktoś wie co jest i jak zrobić żeby działało.
A i jeszcze jedno:
Jak skasuje wszystkie cyfry w SpinEdit(nie połączony żadną procedurą jeszcze z innym komponentem) to, to samo sie robi.
to powiedz chciaz jaki blad ??
wyskakuje okienko z tekstem:
Project Project1.exe raised exception class EConvertError with message `is not a valid integer value'.
Use Step or Run to continue.
i przyciskiem OK.
Od razu: Spin edit jest kicha, lepiej użyć kombinacji TEdit&TUpDown, efekcior gwarantowany (XP style compatible), a standardowy kod to:
if not Edit1.Text='' then
costam:=IntToStr(Edit1.Text) //sprawdzone, jeszcze można kombinować z ograniczeniem wejścia
Mimo wszystko jeśli ktoś wie jak to zrobić z SpiEdit'em to niech napisze.
[code]Memo1.Width:=SpinEdit1.value[/code]
try
Memo1.Width:=SpinEdit.Value
expect
end;
BTW:
- spójrz na sygnaturkę i info o tagu Delphi
- kto nazywa komponenty Memo1, Memo2 ??
try
Memo1.Width:=SpinEdit.Value
expect
end;
To twoje wywalało błąd.
Ja zrobiłem tak. Prograzm sie odpala, ale dalej sie stopuje jak kasuje cyfry, albo jak je zaznaczam i naciskam inną.
begin
try
Memo1.Width:=SpinEdit.Value
except
end;
end;
Ma ktoś coś lepszego?
to sprawdzaj w pętelce czy są podane same cyferki, jesli nie to wywalaj ten znaczek ze stringa, np
for i := 1 to length(str) do
if (str[i] >'9') and (str[i]