Buscar

Função letreiro digital

Código

//Onactive do form  digite o seginte comando:

form1.capition:='delphi';


//insira um time  e de um duplo clik e digite os comandos

var
texto: string;

begin
texto:= form1.capition;

form1.capition:= copy(texto,2,length(texto))+ texto[1];

end;
 

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%


Detalhes da dica

Categoria: Forms
Adicionada dia: 06/12/04
Por: Wilson Alessandro Pulga
Visualizada: 5247 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009