setTicker


procedure setTicker(s:string);

Adds a ticker-tape effect to the form.

  begin
  showForm;
  setTicker('MIDlet created with MIDletPascal');
  delay(5000);
  end.