procedure TForm3.Button3Click(Sender: TObject);
var
  colunas: Integer;
begin
  // vamos obter a quantidade de colunas no DBGrid
  colunas := DBGrid1.Columns.Count;
  ShowMessage('O DBGrid possui ' + IntToStr(colunas) + ' colunas');
end;

<?php
  // vamos criar um array de inteiros
  $valores = Array(5, 2, 7, 1);

  // vamos testar se a variável é do tipo array
  if(is_array($valores)){
    echo 'A variável $valores é do tipo array.';
  }
  else{
    echo 'A variável $valores NÃO é do tipo array.';
  }
?>

FILE *fopen(const char *nome, const char *modo);

#include <stdio.h>
#include <stdlib.h>

int main(int argc, char *argv[])
{
  FILE *arquivo = fopen("c:\\testes.txt", "r");

  // testa se o arquivo foi aberto com sucesso
  if(arquivo != NULL)
    printf("Arquivo foi aberto com sucesso.");
  else
    printf("Nao foi possivel abrir o arquivo.");

  printf("\n\n");
  system("PAUSE");
  return 0;
}

// uma variável usado para armazenar um valor inteiro
int valor;

static void Main(string[] args){
  // declara e inicializa uma variável do tipo double
  double salario = 2345.32;

  // exibe o valor da variável
  Console.WriteLine("Salário: {0}", salario);

  Console.WriteLine("\n\nPressione uma tecla para sair...");
  Console.ReadKey();
}

// declara três variáveis do tipo char
char a, b, c;

static void Main(string[] args){
  // declara três variáveis do tipo int
  int a, b, soma;

  // inicializa as duas primeiras variáveis
  a = 20;
  b = 10;

  // inicializa a terceira variável usando os valores
  // das duas anteriores
  soma = a + b;

  // exibe o resultado
  Console.WriteLine("Resultado: {0}", soma);

  Console.WriteLine("\n\nPressione uma tecla para sair...");
  Console.ReadKey();
}

int remove(const char *filename);

#include <stdio.h>
#include <stdlib.h>

int main(int argc, char *argv[])
{
  // nome do arquivo a ser excluído
  char *arquivo = "c:\\testes.txt";

  // vamos excluir
  if(remove(arquivo) == 0)
    printf("Arquivo foi excluido com sucesso.");
  else
    printf("Nao foi possivel excluir o arquivo.");

  printf("\n\n");
  system("PAUSE");
  return 0;
}