<?php
  // vamos obter o dia da semana para uma 
  // determinada data - mês/dia/ano
  $timestamp = mktime(0, 0, 0, 6, 20, 1980);
  echo "O dia da semana é: " . date('l', $timestamp);
?>

23;OSMAR J SILVA;AV. LESTE, 54;GOIANIA;GO
19;MARCOS DE PAULA;RUA L, 523;SÃO PAULO;SP

<?php
  // nome do arquivo
  $arquivo = 'dados.csv';
 
  // ponteiro para o arquivo
  $fp = fopen($arquivo, "r");

  // processa os dados do arquivo
  while(($dados = fgetcsv($fp, 0, ";")) !== FALSE){
    $quant_campos = count($dados);
    for($i = 0; $i < $quant_campos; $i++){
      echo $dados[$i] . "<br>";
    }
    echo "<br>";
  }

  fclose($fp);
?>

<p>Sou o primeiro parágrafo</p>
<p>Sou o segundo parágrafo</p>

<script type="text/javascript">
<!--
  function definirInnerHTML(){
    var texto = "<b>Veja este texto</b>";
	
    // define o conteúdo para os elementos P
    $('p').html(texto);
  }
//-->
</script>

procedure TForm3.Button3Click(Sender: TObject);
begin
  // vamos adicionar um novo item na PickList da primeira coluna
  DBGrid1.Columns[0].PickList.Add('40');
end;

procedure TForm3.Button3Click(Sender: TObject);
var
  i: Integer;
begin
  // vamos adicionar o conteúdo da PickList da primeira coluna
  // a um TMemo
  for i := 0 to DBGrid1.Columns[0].PickList.Count - 1 do
    begin
      Memo1.Lines.Add(DBGrid1.Columns[0].PickList[i]);
    end;
end;