Eis a função.
procedure DBGridToClipBoard(DBGrid: TDBGrid; PastHeader: Boolean);
var
StrToCopy: string;
Idx, IdxCol: Integer;
BookMark, SavedBookMark: TBookMark;
begin
if DBGrid.SelectedRows.Count = 0 then
Exit;
StrToCopy := '';
if yes = true then begin
if PastHeader then
Oi...
Tutorial:
http://www.delphibr.com.br/artigos/des_qr.php
http://scriptbrasil.com.br/forum/index.php?showtopic=90140
Abraço,
Júlio César Santiago Guiótti
2009/10/30 simoesluciano simoesluci...@yahoo.com.br
Não basta criar o novo Form e colocar o componente do quick?
Luciano C.
galera tenho a procedure abaixo em FB ...
alguem pode dar uma força em traduzir-la pra mysql ?
vlw ...
sei que set term = delimiter;
declare variable = declare;
for select = ?
returns = ?
etc ...
vlw !!
*SET TERM ^ ;
RECREATE PROCEDURE AGENDA
RETURNS (
ID_PESSOA INTEGER,
NOME VARCHAR(75),
3 matches
Mail list logo