Posts Similares
-
Converte String em Pchar
Compartilhe :Função que converte String em Pchar em Delphi function StrToPChar(const Str: string): PChar; type TRingIndex = 0..7; var Ring: array[TRingIndex] of PChar; RingIndex: TRingIndex; Ptr: PChar; begin Ptr := @Str[Length(Str)]; Inc(Ptr); if Ptr^ = #0 then begin Result := @Str[1]; end else begin Result := StrAlloc(Length(Str)+1); RingIndex := (RingIndex + 1) mod (High(TRingIndex) +…
-
-
-
Introdução ao AJAX e Fetch API em JavaScript
Compartilhe :Introdução ao AJAX e Fetch API em JavaScript Entenda o que é AJAX e como utilizar a Fetch API para realizar requisições assíncronas ao servidor. Veja exemplos de carregamento de dados sem recarregar a página. Introdução ao AJAX e Fetch API em JavaScript Com o avanço das tecnologias web, a necessidade de carregar dados…
-
-
Filtra todos os números de uma string
Compartilhe :Filtra todos os números de uma string em Delphi Function SoNumero(Texto : String) : String; var Ind : Integer; TmpRet : String; begin TmpRet := ”; for Ind := 1 to Length(Texto) do begin if IsDigit(Copy(Texto,Ind,1)) then begin TmpRet := TmpRet + Copy(Texto, Ind, 1); end; end; Result := TmpRet; end;
