Macrosubstiuição !!!!! Socorro !!!!
No clipper posso comparar o conteúdo de uma string através da macrosubstituição. Ex:
Codigo := ´01020304´
Comparar := ´03´
IF Comparar $ Codigo Then
// o conteúdo de Comparar esta contido em Codigo
Este comando ´ $ ´ verifica se o conteúdo ´03´ existe dentro da string Codigo do 1º até o último caracter.
Pergunta como realizar a mesma coisa em Object Pascal e também como utilizar isso em consulta SQL.
Desde já agradeço a ajuda.
Marcos
m_gab@hotmail.com
Codigo := ´01020304´
Comparar := ´03´
IF Comparar $ Codigo Then
// o conteúdo de Comparar esta contido em Codigo
Este comando ´ $ ´ verifica se o conteúdo ´03´ existe dentro da string Codigo do 1º até o último caracter.
Pergunta como realizar a mesma coisa em Object Pascal e também como utilizar isso em consulta SQL.
Desde já agradeço a ajuda.
Marcos
m_gab@hotmail.com
M_gab
Curtidas 0
Respostas
Carnette
10/02/2003
IF Pos(Comparar,Codigo) > 0 Then ShowMessage(´Existe´)
Else ShowMessage(´Nao Existe´);
Else ShowMessage(´Nao Existe´);
GOSTEI 0