Mostrar comilla simple dentro de un string
 

Bueno... aunque sea muy básico esto, por si alguna persona no sabe cómo mostrar dentro de un texto una comilla simple (ya que este caracter no lo puedes escribir diréctamente en el código de delphi para mostrarlo dentro de una cadena de texto) aquí dejo algunas formas de hacerlo. Muy últil en consultas SQL ya que usa comilla simple :D

Espero que les sea de utilidad =)

Ejemplos:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  //Ejemplo 1
  ShowMessage('''' + 'Esta cadena muestra comilla simple' + '''');
  //Ejemplo 2
  ShowMessage(Char(39) + 'Esta cadena muestra comilla simple' + Char(39));
  //Ejemplo 3
  ShowMessage(#39 + 'Esta cadena muestra comilla simple' + #39);
  //Ejemplo 4
  ShowMessage(Char($27) + 'Esta cadena muestra comilla simple' + Char($27));
end;

Ojalá les sirva a los que vi en otros post preguntando cómo agregar la comilla simple en una sentencia SQL en el código de delphi :)

Saludos ;)

Hola Black_Ocean

Gracias por el aporte, también puedes hacer uso de la función QuotedStr de esta manera.

Código Delphi [-]
ShowMessage(QuotedStr('Esta cadena muestra comilla simple'));

Salud OS.

Gracias, esa no me la sabía :)

Saludos ;)