Cze. Piszę swój pierwszy komponent :)
To komponent typu scroll Label.
na razie mam tylko takie zawiązki w osobnym projekcie i kilka pytań:
- Czy instrukcja sleep umieszczona w kodzie komponentu zatrzymuje TYLKO jego pracę, czy pracę całego programu?
- Dlaczego nie działa mi procedura po kolei:
if length(t)=length(napis) then
begin
label1.Caption:=napis[1]+label1.Caption;
sleep(1000);
zmienna t to pomocniczy string(to, co w danym momencie widać na ekranie), a napis to zmienna przechowująca tekst do scrollowania
I teraz jest tak. Gdy mają taką samą długość, nie dodawała się pierwsza literka ze zmiennej napis, a dodaję tak:
i:=i-1;
insert(napis[i], t, 1);
Więc umieściłem instrukcję, którą widać wyżej(label1.caption..blablabla)
Ale z tego, co zauważyłem, to najpierw wstrzymuje pracę program, a potem dodaje tą literkę... Dlaczego tak się dzieje?