Código Delphi [-] IF Pos(a,b) > 0 then ShowMessage('Esta en string') else ShowMessage('NO esta en string');
IF Pos(a,b) > 0 then ShowMessage('Esta en string') else ShowMessage('NO esta en string');