Jump to content

ORLANDO

Members
  • Posts

    6
  • Joined

  • Last visited

Posts posted by ORLANDO

  1. Fiz um exemplo criando isapi e firedac, mas esta dando o seguinte erro

    [FireDAC][Stan][Def]-254. Definition [Plantao] is not found in []

    me parece e porque ele nao encontra o arquivo de configuração do firedac, em sistemas normais eu so coloco os dois arquivos e pronto, mas na dll nao sei onde colocar,

    alguem poderia me ajudar.

     

  2. preciso fazer uma opcao com messagedlg 

     

    tipo 

    voce e casado: se sim executa uma procedure se nao for executa outra procedure, mas ai ele nao executa corretamente,

    fiz assim

    no botaoonclick

    var

      vbcasado:booelan;

    begin

     vbcasado:=false;

      MessageDlg('Vc é Casado?', mtConfirmation, mbYesNo,
        procedure(Sender: TComponent; Res: Integer)
        begin
          case Res of
            mrYes : vbcasado :=true ;
            mrNo :  vbcasado:=false;
          end;
        end
      );

    if vbcasado then

      casado

    else

    solteiro;

    end;

    O problema e que ele executa como false, depois que ele pergunta, ou seja, ele nao para para esperar a resposta e depois dar continuidade.

    Alguem sabe como resolver isso.

     

     

×
×
  • Create New...